_ Partial Class frmSourceList Inherits System.Windows.Forms.Form 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. _ Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then components.Dispose() End If Finally MyBase.Dispose(disposing) End Try End Sub 'Wird vom Windows Form-Designer benötigt. Private components As System.ComponentModel.IContainer 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich. 'Das Bearbeiten ist mit dem Windows Form-Designer möglich. 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. _ Private Sub InitializeComponent() Me.button2 = New System.Windows.Forms.Button() Me.button1 = New System.Windows.Forms.Button() Me.listBox1 = New System.Windows.Forms.ListBox() Me.label1 = New System.Windows.Forms.Label() Me.SuspendLayout() ' 'button2 ' Me.button2.Location = New System.Drawing.Point(286, 103) Me.button2.Name = "button2" Me.button2.Size = New System.Drawing.Size(75, 23) Me.button2.TabIndex = 7 Me.button2.Text = "Cancel" Me.button2.UseVisualStyleBackColor = True ' 'button1 ' Me.button1.Location = New System.Drawing.Point(286, 72) Me.button1.Name = "button1" Me.button1.Size = New System.Drawing.Size(75, 23) Me.button1.TabIndex = 6 Me.button1.Text = "Select" Me.button1.UseVisualStyleBackColor = True ' 'listBox1 ' Me.listBox1.FormattingEnabled = True Me.listBox1.Location = New System.Drawing.Point(12, 31) Me.listBox1.Name = "listBox1" Me.listBox1.Size = New System.Drawing.Size(259, 95) Me.listBox1.TabIndex = 5 ' 'label1 ' Me.label1.AutoSize = True Me.label1.Location = New System.Drawing.Point(9, 4) Me.label1.Name = "label1" Me.label1.Size = New System.Drawing.Size(44, 13) Me.label1.TabIndex = 4 Me.label1.Text = "Source:" ' 'frmSourceList ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(372, 149) Me.Controls.Add(Me.button2) Me.Controls.Add(Me.button1) Me.Controls.Add(Me.listBox1) Me.Controls.Add(Me.label1) Me.Name = "frmSourceList" Me.Text = "frmSourceList" Me.ResumeLayout(False) Me.PerformLayout() End Sub Private WithEvents button2 As System.Windows.Forms.Button Private WithEvents button1 As System.Windows.Forms.Button Private WithEvents listBox1 As System.Windows.Forms.ListBox Private WithEvents label1 As System.Windows.Forms.Label End Class