_ Partial Class PasswortabfrageLogin 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(PasswortabfrageLogin)) Me.TxtPasswort = New System.Windows.Forms.TextBox() Me.Label1 = New System.Windows.Forms.Label() Me.CmdLogin = New System.Windows.Forms.Button() Me.SuspendLayout() ' 'TxtPasswort ' Me.TxtPasswort.Location = New System.Drawing.Point(12, 29) Me.TxtPasswort.Name = "TxtPasswort" Me.TxtPasswort.PasswordChar = Global.Microsoft.VisualBasic.ChrW(42) Me.TxtPasswort.Size = New System.Drawing.Size(245, 20) Me.TxtPasswort.TabIndex = 0 ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Location = New System.Drawing.Point(13, 13) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(112, 13) Me.Label1.TabIndex = 1 Me.Label1.Text = "Administratorpasswort:" ' 'CmdLogin ' Me.CmdLogin.BackColor = System.Drawing.SystemColors.GradientActiveCaption Me.CmdLogin.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.CmdLogin.Location = New System.Drawing.Point(182, 55) Me.CmdLogin.Name = "CmdLogin" Me.CmdLogin.Size = New System.Drawing.Size(75, 23) Me.CmdLogin.TabIndex = 2 Me.CmdLogin.Text = "Login" Me.CmdLogin.UseVisualStyleBackColor = False ' 'PasswortabfrageLogin ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.BackColor = System.Drawing.SystemColors.GradientInactiveCaption Me.ClientSize = New System.Drawing.Size(272, 94) Me.Controls.Add(Me.CmdLogin) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.TxtPasswort) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Name = "PasswortabfrageLogin" Me.Text = "ByPass" Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents TxtPasswort As TextBox Friend WithEvents Label1 As Label Friend WithEvents CmdLogin As Button End Class