_ Partial Class frmKundenAufschubdatenBearbeiten 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.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmKundenAufschubdatenBearbeiten)) Me.txtEORINL = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.txtEORI = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label33 = New System.Windows.Forms.Label() Me.usrCntlAufschubkonten = New SDL.usrCntlAufschubkonten() Me.dgvAufschub = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) Me.Label29 = New System.Windows.Forms.Label() Me.Label28 = New System.Windows.Forms.Label() Me.Button1 = New System.Windows.Forms.Button() Me.txtERROR = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.usrCntlAufschubkonten.SuspendLayout() CType(Me.dgvAufschub, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'txtEORINL ' Me.txtEORINL._DateTimeOnly = False Me.txtEORINL._numbersOnly = False Me.txtEORINL._numbersOnlyKommastellen = "" Me.txtEORINL._Prozent = False Me.txtEORINL._ShortDateNew = False Me.txtEORINL._ShortDateOnly = False Me.txtEORINL._TimeOnly = False Me.txtEORINL._value = "" Me.txtEORINL._Waehrung = False Me.txtEORINL.ForeColor = System.Drawing.Color.Red Me.txtEORINL.Location = New System.Drawing.Point(198, 19) Me.txtEORINL.MaxLength = 17 Me.txtEORINL.MaxLineLength = -1 Me.txtEORINL.MaxLines_Warning = "" Me.txtEORINL.MaxLines_Warning_Label = Nothing Me.txtEORINL.Name = "txtEORINL" Me.txtEORINL.Size = New System.Drawing.Size(60, 20) Me.txtEORINL.TabIndex = 22 ' 'txtEORI ' Me.txtEORI._DateTimeOnly = False Me.txtEORI._numbersOnly = False Me.txtEORI._numbersOnlyKommastellen = "" Me.txtEORI._Prozent = False Me.txtEORI._ShortDateNew = False Me.txtEORI._ShortDateOnly = False Me.txtEORI._TimeOnly = False Me.txtEORI._value = "" Me.txtEORI._Waehrung = False Me.txtEORI.ForeColor = System.Drawing.Color.Black Me.txtEORI.Location = New System.Drawing.Point(54, 19) Me.txtEORI.MaxLength = 17 Me.txtEORI.MaxLineLength = -1 Me.txtEORI.MaxLines_Warning = "" Me.txtEORI.MaxLines_Warning_Label = Nothing Me.txtEORI.Name = "txtEORI" Me.txtEORI.Size = New System.Drawing.Size(145, 20) Me.txtEORI.TabIndex = 21 ' 'Label33 ' Me.Label33.AutoSize = True Me.Label33.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label33.Location = New System.Drawing.Point(12, 22) Me.Label33.Name = "Label33" Me.Label33.Size = New System.Drawing.Size(36, 13) Me.Label33.TabIndex = 20 Me.Label33.Text = "EORI:" ' 'usrCntlAufschubkonten ' Me.usrCntlAufschubkonten.Controls.Add(Me.dgvAufschub) Me.usrCntlAufschubkonten.Location = New System.Drawing.Point(12, 45) Me.usrCntlAufschubkonten.Name = "usrCntlAufschubkonten" Me.usrCntlAufschubkonten.Size = New System.Drawing.Size(652, 142) Me.usrCntlAufschubkonten.TabIndex = 23 ' 'dgvAufschub ' Me.dgvAufschub.AKTUALISIERUNGS_INTERVALL = -1 Me.dgvAufschub.AllowUserToAddRows = False Me.dgvAufschub.AllowUserToDeleteRows = False Me.dgvAufschub.AllowUserToResizeColumns = False Me.dgvAufschub.AllowUserToResizeRows = False Me.dgvAufschub.BackgroundColor = System.Drawing.Color.White Me.dgvAufschub.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.dgvAufschub.Location = New System.Drawing.Point(3, 0) Me.dgvAufschub.MultiSelect = False Me.dgvAufschub.Name = "dgvAufschub" Me.dgvAufschub.ReadOnly = True Me.dgvAufschub.RowHeadersVisible = False Me.dgvAufschub.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.dgvAufschub.Size = New System.Drawing.Size(610, 102) Me.dgvAufschub.TabIndex = 0 Me.dgvAufschub.TabStop = False ' 'Label29 ' Me.Label29.AutoSize = True Me.Label29.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label29.Location = New System.Drawing.Point(12, 177) Me.Label29.Name = "Label29" Me.Label29.Size = New System.Drawing.Size(109, 13) Me.Label29.TabIndex = 24 Me.Label29.Text = "Übertrag in DAKOSY:" ' 'Label28 ' Me.Label28.AutoSize = True Me.Label28.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label28.Location = New System.Drawing.Point(135, 177) Me.Label28.Name = "Label28" Me.Label28.Size = New System.Drawing.Size(10, 13) Me.Label28.TabIndex = 25 Me.Label28.Text = "-" ' 'Button1 ' Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button1.Location = New System.Drawing.Point(15, 193) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(330, 30) Me.Button1.TabIndex = 26 Me.Button1.Text = "Speichern + Kundenstamm übertragen" Me.Button1.UseVisualStyleBackColor = True ' 'txtERROR ' Me.txtERROR._DateTimeOnly = False Me.txtERROR._numbersOnly = False Me.txtERROR._numbersOnlyKommastellen = "" Me.txtERROR._Prozent = False Me.txtERROR._ShortDateNew = False Me.txtERROR._ShortDateOnly = False Me.txtERROR._TimeOnly = False Me.txtERROR._value = "" Me.txtERROR._Waehrung = False Me.txtERROR.BackColor = System.Drawing.SystemColors.Window Me.txtERROR.BorderStyle = System.Windows.Forms.BorderStyle.None Me.txtERROR.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.txtERROR.ForeColor = System.Drawing.Color.Red Me.txtERROR.Location = New System.Drawing.Point(382, 177) Me.txtERROR.MaxLength = 9999 Me.txtERROR.MaxLineLength = -1 Me.txtERROR.MaxLines_Warning = "" Me.txtERROR.MaxLines_Warning_Label = Nothing Me.txtERROR.Multiline = True Me.txtERROR.Name = "txtERROR" Me.txtERROR.Size = New System.Drawing.Size(243, 52) Me.txtERROR.TabIndex = 27 ' 'frmKundenAufschubdatenBearbeiten ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.BackColor = System.Drawing.Color.White Me.ClientSize = New System.Drawing.Size(669, 241) Me.Controls.Add(Me.txtERROR) Me.Controls.Add(Me.Label29) Me.Controls.Add(Me.Label28) Me.Controls.Add(Me.Button1) Me.Controls.Add(Me.usrCntlAufschubkonten) Me.Controls.Add(Me.txtEORINL) Me.Controls.Add(Me.txtEORI) Me.Controls.Add(Me.Label33) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Name = "frmKundenAufschubdatenBearbeiten" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "Aufschubdaten bearbeiten" Me.usrCntlAufschubkonten.ResumeLayout(False) Me.usrCntlAufschubkonten.PerformLayout() CType(Me.dgvAufschub, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents txtEORINL As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents txtEORI As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents Label33 As System.Windows.Forms.Label Friend WithEvents usrCntlAufschubkonten As SDL.usrCntlAufschubkonten Friend WithEvents dgvAufschub As VERAG_PROG_ALLGEMEIN.MyDatagridview Friend WithEvents Label29 As System.Windows.Forms.Label Friend WithEvents Label28 As System.Windows.Forms.Label Friend WithEvents Button1 As System.Windows.Forms.Button Friend WithEvents txtERROR As VERAG_PROG_ALLGEMEIN.MyTextBox End Class