📄 form3.vb
字号:
Me.TextBox5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.TextBox5.Location = New System.Drawing.Point(466, 29)
Me.TextBox5.MaxLength = 50
Me.TextBox5.Name = "TextBox5"
Me.TextBox5.Size = New System.Drawing.Size(184, 20)
Me.TextBox5.TabIndex = 3
Me.TextBox5.Text = ""
'
'TextBox3
'
Me.TextBox3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.TextBox3.Location = New System.Drawing.Point(82, 29)
Me.TextBox3.MaxLength = 50
Me.TextBox3.Name = "TextBox3"
Me.TextBox3.Size = New System.Drawing.Size(184, 20)
Me.TextBox3.TabIndex = 1
Me.TextBox3.Text = ""
'
'TextBox9
'
Me.TextBox9.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.TextBox9.Location = New System.Drawing.Point(82, 117)
Me.TextBox9.MaxLength = 50
Me.TextBox9.Name = "TextBox9"
Me.TextBox9.Size = New System.Drawing.Size(246, 20)
Me.TextBox9.TabIndex = 6
Me.TextBox9.Text = ""
'
'ComboBox1
'
Me.ComboBox1.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.ComboBox1.Location = New System.Drawing.Point(394, 117)
Me.ComboBox1.Name = "ComboBox1"
Me.ComboBox1.Size = New System.Drawing.Size(254, 22)
Me.ComboBox1.TabIndex = 7
'
'Label12
'
Me.Label12.Location = New System.Drawing.Point(344, 117)
Me.Label12.Name = "Label12"
Me.Label12.Size = New System.Drawing.Size(48, 23)
Me.Label12.TabIndex = 36
Me.Label12.Text = "Status:"
Me.Label12.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'Label11
'
Me.Label11.Location = New System.Drawing.Point(26, 116)
Me.Label11.Name = "Label11"
Me.Label11.Size = New System.Drawing.Size(56, 23)
Me.Label11.TabIndex = 35
Me.Label11.Text = "Position:"
Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'DateTimePicker1
'
Me.DateTimePicker1.Format = System.Windows.Forms.DateTimePickerFormat.Short
Me.DateTimePicker1.Location = New System.Drawing.Point(82, 93)
Me.DateTimePicker1.Name = "DateTimePicker1"
Me.DateTimePicker1.Size = New System.Drawing.Size(246, 20)
Me.DateTimePicker1.TabIndex = 5
Me.DateTimePicker1.Value = New Date(2006, 11, 5, 0, 0, 0, 0)
'
'Label10
'
Me.Label10.Location = New System.Drawing.Point(352, 92)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(40, 23)
Me.Label10.TabIndex = 34
Me.Label10.Text = "Age:"
Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'Label9
'
Me.Label9.Location = New System.Drawing.Point(26, 92)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(56, 23)
Me.Label9.TabIndex = 33
Me.Label9.Text = "Birthday:"
Me.Label9.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'Label8
'
Me.Label8.Location = New System.Drawing.Point(26, 67)
Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(56, 24)
Me.Label8.TabIndex = 32
Me.Label8.Text = "Address:"
Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'Label7
'
Me.Label7.Location = New System.Drawing.Point(472, 48)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(176, 16)
Me.Label7.TabIndex = 31
Me.Label7.Text = "Last Name"
Me.Label7.TextAlign = System.Drawing.ContentAlignment.TopCenter
'
'Label6
'
Me.Label6.Location = New System.Drawing.Point(280, 48)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(176, 16)
Me.Label6.TabIndex = 30
Me.Label6.Text = "Middle Name"
Me.Label6.TextAlign = System.Drawing.ContentAlignment.TopCenter
'
'Label5
'
Me.Label5.Location = New System.Drawing.Point(88, 48)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(176, 16)
Me.Label5.TabIndex = 29
Me.Label5.Text = "First Name"
Me.Label5.TextAlign = System.Drawing.ContentAlignment.TopCenter
'
'Label4
'
Me.Label4.Location = New System.Drawing.Point(42, 27)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(40, 24)
Me.Label4.TabIndex = 27
Me.Label4.Text = "Name:"
Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'Label3
'
Me.Label3.Location = New System.Drawing.Point(10, 3)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(72, 24)
Me.Label3.TabIndex = 25
Me.Label3.Text = "ID Number:"
Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'TextBox8
'
Me.TextBox8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.TextBox8.Location = New System.Drawing.Point(394, 93)
Me.TextBox8.MaxLength = 50
Me.TextBox8.Name = "TextBox8"
Me.TextBox8.ReadOnly = True
Me.TextBox8.Size = New System.Drawing.Size(254, 20)
Me.TextBox8.TabIndex = 26
Me.TextBox8.TabStop = False
Me.TextBox8.Text = "0"
'
'TextBox6
'
Me.TextBox6.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.TextBox6.Location = New System.Drawing.Point(82, 69)
Me.TextBox6.MaxLength = 150
Me.TextBox6.Name = "TextBox6"
Me.TextBox6.Size = New System.Drawing.Size(568, 20)
Me.TextBox6.TabIndex = 4
Me.TextBox6.Text = ""
'
'TextBox2
'
Me.TextBox2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.TextBox2.Location = New System.Drawing.Point(82, 5)
Me.TextBox2.MaxLength = 15
Me.TextBox2.Name = "TextBox2"
Me.TextBox2.Size = New System.Drawing.Size(182, 20)
Me.TextBox2.TabIndex = 0
Me.TextBox2.Text = ""
'
'TabPage3
'
Me.TabPage3.BackColor = System.Drawing.SystemColors.Control
Me.TabPage3.Controls.Add(Me.ListView2)
Me.TabPage3.Controls.Add(Me.GroupBox8)
Me.TabPage3.Controls.Add(Me.Label27)
Me.TabPage3.Controls.Add(Me.MonthCalendar1)
Me.TabPage3.Controls.Add(Me.GroupBox5)
Me.TabPage3.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.TabPage3.Location = New System.Drawing.Point(4, 23)
Me.TabPage3.Name = "TabPage3"
Me.TabPage3.Size = New System.Drawing.Size(688, 341)
Me.TabPage3.TabIndex = 2
Me.TabPage3.Text = "Log-Ins (Individual)"
'
'ListView2
'
Me.ListView2.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.ColumnHeader10, Me.ColumnHeader11, Me.ColumnHeader12})
Me.ListView2.FullRowSelect = True
Me.ListView2.GridLines = True
Me.ListView2.Location = New System.Drawing.Point(208, 96)
Me.ListView2.MultiSelect = False
Me.ListView2.Name = "ListView2"
Me.ListView2.Size = New System.Drawing.Size(472, 240)
Me.ListView2.TabIndex = 19
Me.ListView2.View = System.Windows.Forms.View.Details
'
'ColumnHeader10
'
Me.ColumnHeader10.Text = "Date"
Me.ColumnHeader10.Width = 150
'
'ColumnHeader11
'
Me.ColumnHeader11.Text = "Time In"
Me.ColumnHeader11.Width = 149
'
'ColumnHeader12
'
Me.ColumnHeader12.Text = "Time Out"
Me.ColumnHeader12.Width = 155
'
'GroupBox8
'
Me.GroupBox8.Controls.Add(Me.RadioButton2)
Me.GroupBox8.Controls.Add(Me.RadioButton1)
Me.GroupBox8.Location = New System.Drawing.Point(8, 88)
Me.GroupBox8.Name = "GroupBox8"
Me.GroupBox8.Size = New System.Drawing.Size(192, 72)
Me.GroupBox8.TabIndex = 11
Me.GroupBox8.TabStop = False
Me.GroupBox8.Text = " Filter Login Dates using"
'
'RadioButton2
'
Me.RadioButton2.Location = New System.Drawing.Point(16, 48)
Me.RadioButton2.Name = "RadioButton2"
Me.RadioButton2.Size = New System.Drawing.Size(168, 16)
Me.RadioButton2.TabIndex = 13
Me.RadioButton2.Text = "Date(s) selected below"
'
'RadioButton1
'
Me.RadioButton1.Checked = True
Me.RadioButton1.Location = New System.Drawing.Point(16, 24)
Me.RadioButton1.Name = "RadioButton1"
Me.RadioButton1.Size = New System.Drawing.Size(168, 16)
Me.RadioButton1.TabIndex = 12
Me.RadioButton1.TabStop = True
Me.RadioButton1.Text = "All Dates"
'
'Label27
'
Me.Label27.Location = New System.Drawing.Point(8, 8)
Me.Label27.Name = "Label27"
Me.Label27.Size = New System.Drawing.Size(672, 32)
Me.Label27.TabIndex = 10
Me.Label27.Text = "This provides the ability to view individual Employee Login Information stored in" & _
" the database. Login Information of the selected Employee in the Employee List T" & _
"abs are automatically shown."
'
'MonthCalendar1
'
Me.MonthCalendar1.BackColor = System.Drawing.SystemColors.Control
Me.MonthCalendar1.ForeColor = System.Drawing.Color.SteelBlue
Me.MonthCalendar1.Location = New System.Drawing.Point(19, 168)
Me.MonthCalendar1.MaxSelectionCount = 14
Me.MonthCalendar1.MinDate = New Date(1980, 1, 1, 0, 0, 0, 0)
Me.MonthCalendar1.Name = "MonthCalendar1"
Me.MonthCalendar1.TabIndex = 0
Me.MonthCalendar1.TitleBackColor = System.Drawing.Color.DarkSlateGray
Me.MonthCalendar1.TitleForeColor = System.Drawing.Color.Salmon
Me.MonthCalendar1.TrailingForeColor = System.Drawing.Color.Green
'
'GroupBox5
'
Me.GroupBox5.Controls.Add(Me.TextBox10)
Me.GroupBox5.Controls.Add(Me.Label30)
Me.GroupBox5.Controls.Add(Me.TextBox7)
Me.GroupBox5.Controls.Add(Me.Label29)
Me.GroupBox5.Controls.Add(Me.TextBox1)
Me.GroupBox5.Controls.Add(Me.Label28)
Me.GroupBox5.Location = New System.Drawing.Point(8, 40)
Me.GroupBox5.Name = "GroupBox5"
Me.GroupBox5.Size = New System.Drawing.Size(672, 48)
Me.GroupBox5.TabIndex = 18
Me.GroupBox5.TabStop = False
Me.GroupBox5.Text = " Employee Information"
'
'TextBox10
'
Me.TextBox10.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.TextBox10.Location = New System.Drawing.Point(528, 16)
Me.TextBox10.Name = "TextBox10"
Me.TextBox10.ReadOnly = True
Me.TextBox10.Size = New System.Drawing.Size(136, 20)
Me.TextBox10.TabIndex = 23
Me.TextBox10.Text = ""
'
'Label30
'
Me.Label30.Location = New System.Drawing.Point(480, 16)
Me.Label30.Name = "Label30"
Me.Label30.Size = New System.Drawing.Size(48, 16)
Me.Label30.TabIndex = 22
Me.Label30.Text = "Position:"
Me.Label30.TextAlign = System.Drawing.ContentAlignment.BottomRight
'
'TextBox7
'
Me.TextBox7.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.TextBox7.Location = New System.Drawing.Point(216, 16)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -