_ Partial Class frmEintragKW 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.Label2 = New System.Windows.Forms.Label() Me.btnAbbruch = New System.Windows.Forms.Button() Me.lblKW = New System.Windows.Forms.Label() Me.txtKW_neu = New System.Windows.Forms.TextBox() Me.lblKWneu = New System.Windows.Forms.Label() Me.txtKW_alt = New System.Windows.Forms.TextBox() Me.Label4 = New System.Windows.Forms.Label() Me.txtKW_neu2 = New System.Windows.Forms.TextBox() Me.Label1 = New System.Windows.Forms.Label() Me.lblMitarbeiter = New System.Windows.Forms.Label() Me.SuspendLayout() ' 'btnOK ' Me.btnOK.Location = New System.Drawing.Point(65, 192) Me.btnOK.Name = "btnOK" Me.btnOK.Size = New System.Drawing.Size(80, 40) Me.btnOK.TabIndex = 3 Me.btnOK.Text = "OK" Me.btnOK.UseVisualStyleBackColor = True ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.Location = New System.Drawing.Point(42, 29) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(84, 13) Me.Label2.TabIndex = 20 Me.Label2.Text = "Mitarbeiterkürzel" ' 'btnAbbruch ' Me.btnAbbruch.Location = New System.Drawing.Point(173, 192) Me.btnAbbruch.Name = "btnAbbruch" Me.btnAbbruch.Size = New System.Drawing.Size(80, 40) Me.btnAbbruch.TabIndex = 4 Me.btnAbbruch.Text = "Abbruch" Me.btnAbbruch.UseVisualStyleBackColor = True ' 'lblKW ' Me.lblKW.AutoSize = True Me.lblKW.Location = New System.Drawing.Point(42, 65) Me.lblKW.Name = "lblKW" Me.lblKW.Size = New System.Drawing.Size(66, 13) Me.lblKW.TabIndex = 20 Me.lblKW.Text = "Kennwort alt" ' 'txtKW_neu ' Me.txtKW_neu.Location = New System.Drawing.Point(144, 99) Me.txtKW_neu.MaxLength = 20 Me.txtKW_neu.Name = "txtKW_neu" Me.txtKW_neu.PasswordChar = Global.Microsoft.VisualBasic.ChrW(42) Me.txtKW_neu.Size = New System.Drawing.Size(120, 20) Me.txtKW_neu.TabIndex = 1 ' 'lblKWneu ' Me.lblKWneu.AutoSize = True Me.lblKWneu.Location = New System.Drawing.Point(42, 102) Me.lblKWneu.Name = "lblKWneu" Me.lblKWneu.Size = New System.Drawing.Size(75, 13) Me.lblKWneu.TabIndex = 20 Me.lblKWneu.Text = "Kennwort Neu" ' 'txtKW_alt ' Me.txtKW_alt.Location = New System.Drawing.Point(144, 62) Me.txtKW_alt.MaxLength = 20 Me.txtKW_alt.Name = "txtKW_alt" Me.txtKW_alt.PasswordChar = Global.Microsoft.VisualBasic.ChrW(42) Me.txtKW_alt.Size = New System.Drawing.Size(120, 20) Me.txtKW_alt.TabIndex = 0 ' 'Label4 ' Me.Label4.AutoSize = True Me.Label4.Location = New System.Drawing.Point(42, 128) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(73, 13) Me.Label4.TabIndex = 20 Me.Label4.Text = "Wiederholung" ' 'txtKW_neu2 ' Me.txtKW_neu2.Location = New System.Drawing.Point(144, 132) Me.txtKW_neu2.MaxLength = 20 Me.txtKW_neu2.Name = "txtKW_neu2" Me.txtKW_neu2.PasswordChar = Global.Microsoft.VisualBasic.ChrW(42) Me.txtKW_neu2.Size = New System.Drawing.Size(120, 20) Me.txtKW_neu2.TabIndex = 2 ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Location = New System.Drawing.Point(42, 141) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(75, 13) Me.Label1.TabIndex = 20 Me.Label1.Text = "Kennwort Neu" ' 'lblMitarbeiter ' Me.lblMitarbeiter.AutoSize = True Me.lblMitarbeiter.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.lblMitarbeiter.Location = New System.Drawing.Point(140, 24) Me.lblMitarbeiter.Name = "lblMitarbeiter" Me.lblMitarbeiter.Size = New System.Drawing.Size(131, 20) Me.lblMitarbeiter.TabIndex = 20 Me.lblMitarbeiter.Text = "Max Mustermann" ' 'frmEintragKW ' Me.AcceptButton = Me.btnOK Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(202, Byte), Integer), CType(CType(225, Byte), Integer), CType(CType(255, Byte), Integer)) Me.ClientSize = New System.Drawing.Size(318, 253) Me.Controls.Add(Me.btnAbbruch) Me.Controls.Add(Me.txtKW_alt) Me.Controls.Add(Me.txtKW_neu2) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.Label4) Me.Controls.Add(Me.txtKW_neu) Me.Controls.Add(Me.lblKWneu) Me.Controls.Add(Me.lblKW) Me.Controls.Add(Me.lblMitarbeiter) Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.btnOK) Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog Me.KeyPreview = True Me.MaximizeBox = False Me.MinimizeBox = False Me.Name = "frmEintragKW" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent Me.Text = "Änderung Kennwort" Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents btnOK As System.Windows.Forms.Button Friend WithEvents Label2 As System.Windows.Forms.Label Friend WithEvents btnAbbruch As System.Windows.Forms.Button Friend WithEvents lblKW As System.Windows.Forms.Label Friend WithEvents txtKW_neu As System.Windows.Forms.TextBox Friend WithEvents lblKWneu As System.Windows.Forms.Label Friend WithEvents txtKW_alt As System.Windows.Forms.TextBox Friend WithEvents Label4 As System.Windows.Forms.Label Friend WithEvents txtKW_neu2 As System.Windows.Forms.TextBox Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents lblMitarbeiter As System.Windows.Forms.Label End Class