_ Partial Class FrmNewTable 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.btnOK = New System.Windows.Forms.Button() Me.txtTablename = New System.Windows.Forms.TextBox() Me.Label1 = New System.Windows.Forms.Label() Me.SuspendLayout() ' 'btnOK ' Me.btnOK.Location = New System.Drawing.Point(311, 51) Me.btnOK.Name = "btnOK" Me.btnOK.Size = New System.Drawing.Size(75, 23) Me.btnOK.TabIndex = 0 Me.btnOK.Text = "OK" Me.btnOK.UseVisualStyleBackColor = True ' 'txtTablename ' Me.txtTablename.Location = New System.Drawing.Point(12, 25) Me.txtTablename.Name = "txtTablename" Me.txtTablename.Size = New System.Drawing.Size(374, 20) Me.txtTablename.TabIndex = 1 ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Location = New System.Drawing.Point(12, 9) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(77, 13) Me.Label1.TabIndex = 2 Me.Label1.Text = "Tabellenname:" ' 'FrmNewTable ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(398, 98) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.txtTablename) Me.Controls.Add(Me.btnOK) Me.Name = "FrmNewTable" Me.Text = "Neue Tabelle" Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents btnOK As Button Friend WithEvents txtTablename As TextBox Friend WithEvents Label1 As Label End Class