⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 form3.vb

📁 humar resourse management
💻 VB
📖 第 1 页 / 共 5 页
字号:
        '
        Me.Label17.Location = New System.Drawing.Point(64, 64)
        Me.Label17.Name = "Label17"
        Me.Label17.Size = New System.Drawing.Size(560, 224)
        Me.Label17.TabIndex = 18
        '
        'TabPage1
        '
        Me.TabPage1.BackColor = System.Drawing.SystemColors.Control
        Me.TabPage1.Controls.Add(Me.Label13)
        Me.TabPage1.Controls.Add(Me.ListView1)
        Me.TabPage1.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.TabPage1.Location = New System.Drawing.Point(4, 23)
        Me.TabPage1.Name = "TabPage1"
        Me.TabPage1.Size = New System.Drawing.Size(688, 341)
        Me.TabPage1.TabIndex = 0
        Me.TabPage1.Text = "Employee List (Details)"
        '
        'Label13
        '
        Me.Label13.Location = New System.Drawing.Point(8, 8)
        Me.Label13.Name = "Label13"
        Me.Label13.Size = New System.Drawing.Size(672, 32)
        Me.Label13.TabIndex = 8
        Me.Label13.Text = "This provides the ability to view all the Employee Information in the database an" & _
        "d filter the query by ID, Lastname, Firstname and Position."
        '
        'ListView1
        '
        Me.ListView1.Activation = System.Windows.Forms.ItemActivation.OneClick
        Me.ListView1.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.ColumnHeader1, Me.ColumnHeader2, Me.ColumnHeader3, Me.ColumnHeader4, Me.ColumnHeader5, Me.ColumnHeader6, Me.ColumnHeader7, Me.ColumnHeader8, Me.ColumnHeader9})
        Me.ListView1.FullRowSelect = True
        Me.ListView1.GridLines = True
        Me.ListView1.Location = New System.Drawing.Point(8, 40)
        Me.ListView1.MultiSelect = False
        Me.ListView1.Name = "ListView1"
        Me.ListView1.Size = New System.Drawing.Size(672, 296)
        Me.ListView1.TabIndex = 2
        Me.ListView1.View = System.Windows.Forms.View.Details
        '
        'ColumnHeader1
        '
        Me.ColumnHeader1.Text = "ID"
        Me.ColumnHeader1.Width = 50
        '
        'ColumnHeader2
        '
        Me.ColumnHeader2.Text = "First Name"
        Me.ColumnHeader2.Width = 90
        '
        'ColumnHeader3
        '
        Me.ColumnHeader3.Text = "Middle Name"
        Me.ColumnHeader3.Width = 90
        '
        'ColumnHeader4
        '
        Me.ColumnHeader4.Text = "Last Name"
        Me.ColumnHeader4.Width = 90
        '
        'ColumnHeader5
        '
        Me.ColumnHeader5.Text = "Address"
        Me.ColumnHeader5.Width = 180
        '
        'ColumnHeader6
        '
        Me.ColumnHeader6.Text = "Birthdate"
        '
        'ColumnHeader7
        '
        Me.ColumnHeader7.Text = "Age"
        Me.ColumnHeader7.Width = 35
        '
        'ColumnHeader8
        '
        Me.ColumnHeader8.Text = "Position"
        Me.ColumnHeader8.Width = 120
        '
        'ColumnHeader9
        '
        Me.ColumnHeader9.Text = "Status"
        Me.ColumnHeader9.Width = 80
        '
        'TabPage6
        '
        Me.TabPage6.Controls.Add(Me.GroupBox10)
        Me.TabPage6.Controls.Add(Me.Label31)
        Me.TabPage6.Controls.Add(Me.GroupBox9)
        Me.TabPage6.Controls.Add(Me.ListView3)
        Me.TabPage6.Controls.Add(Me.MonthCalendar2)
        Me.TabPage6.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.TabPage6.Location = New System.Drawing.Point(4, 23)
        Me.TabPage6.Name = "TabPage6"
        Me.TabPage6.Size = New System.Drawing.Size(688, 341)
        Me.TabPage6.TabIndex = 5
        Me.TabPage6.Text = "Log-Ins (All)"
        '
        'GroupBox10
        '
        Me.GroupBox10.Controls.Add(Me.TextBox14)
        Me.GroupBox10.Controls.Add(Me.Label32)
        Me.GroupBox10.Controls.Add(Me.TextBox15)
        Me.GroupBox10.Controls.Add(Me.Label33)
        Me.GroupBox10.Controls.Add(Me.TextBox16)
        Me.GroupBox10.Controls.Add(Me.Label34)
        Me.GroupBox10.Location = New System.Drawing.Point(8, 40)
        Me.GroupBox10.Name = "GroupBox10"
        Me.GroupBox10.Size = New System.Drawing.Size(672, 48)
        Me.GroupBox10.TabIndex = 19
        Me.GroupBox10.TabStop = False
        Me.GroupBox10.Text = "  Employee Information"
        '
        'TextBox14
        '
        Me.TextBox14.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.TextBox14.Location = New System.Drawing.Point(528, 16)
        Me.TextBox14.Name = "TextBox14"
        Me.TextBox14.ReadOnly = True
        Me.TextBox14.Size = New System.Drawing.Size(136, 20)
        Me.TextBox14.TabIndex = 23
        Me.TextBox14.Text = ""
        '
        'Label32
        '
        Me.Label32.Location = New System.Drawing.Point(480, 18)
        Me.Label32.Name = "Label32"
        Me.Label32.Size = New System.Drawing.Size(48, 16)
        Me.Label32.TabIndex = 22
        Me.Label32.Text = "Position:"
        Me.Label32.TextAlign = System.Drawing.ContentAlignment.BottomRight
        '
        'TextBox15
        '
        Me.TextBox15.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.TextBox15.Location = New System.Drawing.Point(216, 16)
        Me.TextBox15.Name = "TextBox15"
        Me.TextBox15.ReadOnly = True
        Me.TextBox15.Size = New System.Drawing.Size(256, 20)
        Me.TextBox15.TabIndex = 21
        Me.TextBox15.Text = ""
        '
        'Label33
        '
        Me.Label33.Location = New System.Drawing.Point(0, 18)
        Me.Label33.Name = "Label33"
        Me.Label33.Size = New System.Drawing.Size(72, 16)
        Me.Label33.TabIndex = 20
        Me.Label33.Text = "ID Number:"
        Me.Label33.TextAlign = System.Drawing.ContentAlignment.BottomRight
        '
        'TextBox16
        '
        Me.TextBox16.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
        Me.TextBox16.Location = New System.Drawing.Point(72, 16)
        Me.TextBox16.MaxLength = 15
        Me.TextBox16.Name = "TextBox16"
        Me.TextBox16.ReadOnly = True
        Me.TextBox16.Size = New System.Drawing.Size(96, 20)
        Me.TextBox16.TabIndex = 19
        Me.TextBox16.Text = ""
        '
        'Label34
        '
        Me.Label34.Location = New System.Drawing.Point(168, 18)
        Me.Label34.Name = "Label34"
        Me.Label34.Size = New System.Drawing.Size(48, 16)
        Me.Label34.TabIndex = 18
        Me.Label34.Text = "Name:"
        Me.Label34.TextAlign = System.Drawing.ContentAlignment.BottomRight
        '
        'Label31
        '
        Me.Label31.Location = New System.Drawing.Point(8, 8)
        Me.Label31.Name = "Label31"
        Me.Label31.Size = New System.Drawing.Size(672, 32)
        Me.Label31.TabIndex = 15
        Me.Label31.Text = "This provides the ability to view All Employee Login Information stored in the da" & _
        "tabase based on the filtering login dates selected. Information of the employee " & _
        "is shown based on the selected Login record."
        '
        'GroupBox9
        '
        Me.GroupBox9.Controls.Add(Me.RadioButton4)
        Me.GroupBox9.Controls.Add(Me.RadioButton3)
        Me.GroupBox9.Location = New System.Drawing.Point(8, 88)
        Me.GroupBox9.Name = "GroupBox9"
        Me.GroupBox9.Size = New System.Drawing.Size(192, 72)
        Me.GroupBox9.TabIndex = 14
        Me.GroupBox9.TabStop = False
        Me.GroupBox9.Text = "  Filter Login Dates using"
        '
        'RadioButton4
        '
        Me.RadioButton4.Location = New System.Drawing.Point(16, 48)
        Me.RadioButton4.Name = "RadioButton4"
        Me.RadioButton4.Size = New System.Drawing.Size(168, 16)
        Me.RadioButton4.TabIndex = 13
        Me.RadioButton4.Text = "Date(s) selected below"
        '
        'RadioButton3
        '
        Me.RadioButton3.Checked = True
        Me.RadioButton3.Location = New System.Drawing.Point(16, 24)
        Me.RadioButton3.Name = "RadioButton3"
        Me.RadioButton3.Size = New System.Drawing.Size(168, 16)
        Me.RadioButton3.TabIndex = 12
        Me.RadioButton3.TabStop = True
        Me.RadioButton3.Text = "All Dates"
        '
        'ListView3
        '
        Me.ListView3.Activation = System.Windows.Forms.ItemActivation.OneClick
        Me.ListView3.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.ColumnHeader16, Me.ColumnHeader13, Me.ColumnHeader14, Me.ColumnHeader15})
        Me.ListView3.FullRowSelect = True
        Me.ListView3.GridLines = True
        Me.ListView3.Location = New System.Drawing.Point(208, 96)
        Me.ListView3.MultiSelect = False
        Me.ListView3.Name = "ListView3"
        Me.ListView3.Size = New System.Drawing.Size(472, 240)
        Me.ListView3.TabIndex = 13
        Me.ListView3.View = System.Windows.Forms.View.Details
        '
        'ColumnHeader16
        '
        Me.ColumnHeader16.Text = "ID Number"
        Me.ColumnHeader16.Width = 67
        '
        'ColumnHeader13
        '
        Me.ColumnHeader13.Text = "Date"
        Me.ColumnHeader13.Width = 117
        '
        'ColumnHeader14
        '
        Me.ColumnHeader14.Text = "Time In"
        Me.ColumnHeader14.Width = 135
        '
        'ColumnHeader15
        '
        Me.ColumnHeader15.Text = "Time Out"
        Me.ColumnHeader15.Width = 130
        '
        'MonthCalendar2
        '
        Me.MonthCalendar2.BackColor = System.Drawing.SystemColors.Control
        Me.MonthCalendar2.ForeColor = System.Drawing.Color.SteelBlue
        Me.MonthCalendar2.Location = New System.Drawing.Point(19, 168)
        Me.MonthCalendar2.MaxSelectionCount = 14
        Me.MonthCalendar2.MinDate = New Date(1980, 1, 1, 0, 0, 0, 0)
        Me.MonthCalendar2.Name = "MonthCalendar2"
        Me.MonthCalendar2.TabIndex = 12
        Me.MonthCalendar2.TitleBackColor = System.Drawing.Color.DarkSlateGray
        Me.MonthCalendar2.TitleForeColor = System.Drawing.Color.Salmon
        Me.MonthCalendar2.TrailingForeColor = System.Drawing.Color.Green
        '
        'TabPage2
        '
        Me.TabPage2.BackColor = System.Drawing.SystemColors.Control
        Me.TabPage2.Controls.Add(Me.Label20)
        Me.TabPage2.Controls.Add(Me.Label19)
        Me.TabPage2.Controls.Add(Me.Label14)
        Me.TabPage2.Controls.Add(Me.GroupBox4)
        Me.TabPage2.Controls.Add(Me.GroupBox3)
        Me.TabPage2.Controls.Add(Me.GroupBox2)
        Me.TabPage2.Controls.Add(Me.GroupBox1)
        Me.TabPage2.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.TabPage2.Location = New System.Drawing.Point(4, 23)
        Me.TabPage2.Name = "TabPage2"
        Me.TabPage2.Size = New System.Drawing.Size(688, 341)
        Me.TabPage2.TabIndex = 1
        Me.TabPage2.Text = "Employee List (Individual)"
        '
        'Label20
        '
        Me.Label20.ForeColor = System.Drawing.Color.Brown
        Me.Label20.Location = New System.Drawing.Point(304, 64)
        Me.Label20.Name = "Label20"
        Me.Label20.Size = New System.Drawing.Size(336, 16)
        Me.Label20.TabIndex = 38
        Me.Label20.Text = ">> Need to change password! Your password is still set to default."
        '
        'Label19
        '
        Me.Label19.Location = New System.Drawing.Point(584, 40)
        Me.Label19.Name = "Label19"
        Me.Label19.Size = New System.Drawing.Size(88, 16)
        Me.Label19.TabIndex = 10
        Me.Label19.Text = "0/0"
        Me.Label19.TextAlign = System.Drawing.ContentAlignment.TopCenter
        '
        'Label14
        '
        Me.Label14.Location = New System.Drawing.Point(8, 8)
        Me.Label14.Name = "Label14"
        Me.Label14.Size = New System.Drawing.Size(672, 32)
        Me.Label14.TabIndex = 9
        Me.Label14.Text = "This provides the ability to view individual Employee Information in the database" & _
        " and add new employee, edit existing information or delete an employee from the " & _

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -