home *** CD-ROM | disk | FTP | other *** search
- VERSION 5.00
- Begin VB.Form Form1
- BorderStyle = 4 'Festes Werkzeugfenster
- Caption = "Abk
- rzungen Suchen"
- ClientHeight = 5430
- ClientLeft = 5040
- ClientTop = 2880
- ClientWidth = 4680
- Icon = "Form1.frx":0000
- LinkTopic = "Form1"
- MaxButton = 0 'False
- MinButton = 0 'False
- ScaleHeight = 5430
- ScaleWidth = 4680
- ShowInTaskbar = 0 'False
- StartUpPosition = 2 'Bildschirmmitte
- Begin VB.Frame Frame1
- Caption = "Ergebnisse"
- Height = 4815
- Left = 0
- TabIndex = 3
- Top = 600
- Width = 4695
- Begin VB.TextBox Text2
- Appearance = 0 '2D
- BackColor = &H00C0C0C0&
- BorderStyle = 0 'Kein
- Height = 4455
- Left = 120
- Locked = -1 'True
- MousePointer = 1 'Pfeil
- MultiLine = -1 'True
- TabIndex = 4
- Top = 240
- Width = 4455
- End
- End
- Begin VB.CommandButton Command1
- Caption = "Suchen"
- Default = -1 'True
- Height = 255
- Left = 3720
- TabIndex = 2
- Top = 240
- Width = 855
- End
- Begin VB.TextBox Text1
- Height = 285
- Left = 960
- TabIndex = 0
- Top = 240
- Width = 2775
- End
- Begin VB.Label Label1
- AutoSize = -1 'True
- Caption = "Abk
- rzung:"
- Height = 195
- Left = 120
- TabIndex = 1
- Top = 240
- Width = 810
- End
- Attribute VB_Name = "Form1"
- Attribute VB_GlobalNameSpace = False
- Attribute VB_Creatable = False
- Attribute VB_PredeclaredId = True
- Attribute VB_Exposed = False
- Private Sub Command1_Click()
- Module1.Main
- End Sub
- Private Sub Form_Load()
- App.TaskVisible = False
- End Sub
-