_ Partial Class frmKdVermerkAdd 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() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmKdVermerkAdd)) Me.btnHinzufugen = New System.Windows.Forms.Button() Me.Label7 = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label() Me.pnl = New System.Windows.Forms.Panel() Me.lblSB = New System.Windows.Forms.Label() Me.MyTextBox1 = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.pnl.SuspendLayout() Me.SuspendLayout() ' 'btnHinzufugen ' Me.btnHinzufugen.Cursor = System.Windows.Forms.Cursors.Default Me.btnHinzufugen.DialogResult = System.Windows.Forms.DialogResult.OK Me.btnHinzufugen.Location = New System.Drawing.Point(282, 96) Me.btnHinzufugen.Name = "btnHinzufugen" Me.btnHinzufugen.Size = New System.Drawing.Size(75, 23) Me.btnHinzufugen.TabIndex = 30 Me.btnHinzufugen.Text = "Hinzufügen" Me.btnHinzufugen.UseVisualStyleBackColor = True ' 'Label7 ' Me.Label7.AutoSize = True Me.Label7.Location = New System.Drawing.Point(9, 17) Me.Label7.Name = "Label7" Me.Label7.Size = New System.Drawing.Size(81, 13) Me.Label7.TabIndex = 28 Me.Label7.Text = "Neuer Vermerk:" ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Location = New System.Drawing.Point(210, 17) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(23, 13) Me.Label1.TabIndex = 32 Me.Label1.Text = "Art:" ' 'pnl ' Me.pnl.BackColor = System.Drawing.Color.White Me.pnl.Controls.Add(Me.lblSB) Me.pnl.Controls.Add(Me.Label7) Me.pnl.Controls.Add(Me.Label1) Me.pnl.Controls.Add(Me.MyTextBox1) Me.pnl.Controls.Add(Me.MyComboBox1) Me.pnl.Controls.Add(Me.btnHinzufugen) Me.pnl.Dock = System.Windows.Forms.DockStyle.Fill Me.pnl.Location = New System.Drawing.Point(0, 0) Me.pnl.Name = "pnl" Me.pnl.Size = New System.Drawing.Size(372, 124) Me.pnl.TabIndex = 33 ' 'lblSB ' Me.lblSB.AutoSize = True Me.lblSB.Location = New System.Drawing.Point(12, 102) Me.lblSB.Name = "lblSB" Me.lblSB.Size = New System.Drawing.Size(10, 13) Me.lblSB.TabIndex = 33 Me.lblSB.Text = "-" ' 'MyTextBox1 ' Me.MyTextBox1._numbersOnly = False Me.MyTextBox1._Prozent = False Me.MyTextBox1._ShortDateNew = False Me.MyTextBox1._TimeOnly = False Me.MyTextBox1._value = Nothing Me.MyTextBox1._Waehrung = False Me.MyTextBox1.ForeColor = System.Drawing.Color.Black Me.MyTextBox1.Location = New System.Drawing.Point(12, 35) Me.MyTextBox1.MaxLength = 5000 Me.MyTextBox1.MaxLineLength = -1 Me.MyTextBox1.MaxLines_Warning = "" Me.MyTextBox1.MaxLines_Warning_Label = Nothing Me.MyTextBox1.Multiline = True Me.MyTextBox1.Name = "MyTextBox1" Me.MyTextBox1.Size = New System.Drawing.Size(345, 61) Me.MyTextBox1.TabIndex = 29 ' 'MyComboBox1 ' Me.MyComboBox1._allowedValuesFreiText = Nothing Me.MyComboBox1._allowFreiText = False Me.MyComboBox1._value = "" Me.MyComboBox1.FormattingEnabled = True Me.MyComboBox1.Location = New System.Drawing.Point(239, 14) Me.MyComboBox1.Name = "MyComboBox1" Me.MyComboBox1.Size = New System.Drawing.Size(118, 21) Me.MyComboBox1.TabIndex = 31 ' 'frmKdVermerkAdd ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(372, 124) Me.Controls.Add(Me.pnl) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Name = "frmKdVermerkAdd" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent Me.Text = "Vermerk" Me.pnl.ResumeLayout(False) Me.pnl.PerformLayout() Me.ResumeLayout(False) End Sub Friend WithEvents btnHinzufugen As System.Windows.Forms.Button Friend WithEvents MyTextBox1 As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents Label7 As System.Windows.Forms.Label Friend WithEvents MyComboBox1 As VERAG_PROG_ALLGEMEIN.MyComboBox Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents pnl As System.Windows.Forms.Panel Friend WithEvents lblSB As System.Windows.Forms.Label End Class