📄 genpayr.vb
字号:
Me.lblemp_fname.Size = New System.Drawing.Size(96, 23)
Me.lblemp_fname.TabIndex = 4
Me.lblemp_fname.Text = "Employee Name"
Me.lblemp_fname.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'lblemp_idno
'
Me.lblemp_idno.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblemp_idno.Location = New System.Drawing.Point(24, 8)
Me.lblemp_idno.Name = "lblemp_idno"
Me.lblemp_idno.Size = New System.Drawing.Size(88, 23)
Me.lblemp_idno.TabIndex = 5
Me.lblemp_idno.Text = "Employee ID#:"
Me.lblemp_idno.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'lblemp_pos
'
Me.lblemp_pos.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblemp_pos.Location = New System.Drawing.Point(0, 72)
Me.lblemp_pos.Name = "lblemp_pos"
Me.lblemp_pos.Size = New System.Drawing.Size(112, 23)
Me.lblemp_pos.TabIndex = 7
Me.lblemp_pos.Text = "Employee Position:"
Me.lblemp_pos.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'edit_Amount
'
Me.edit_Amount.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.edit_Amount.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.objnewGenPayDS, "ePayroll.$Amount"))
Me.edit_Amount.Location = New System.Drawing.Point(584, 40)
Me.edit_Amount.Name = "edit_Amount"
Me.edit_Amount.Size = New System.Drawing.Size(112, 26)
Me.edit_Amount.TabIndex = 8
Me.edit_Amount.Text = ""
'
'editemp_fname
'
Me.editemp_fname.BackColor = System.Drawing.SystemColors.Control
Me.editemp_fname.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.editemp_fname.Location = New System.Drawing.Point(120, 40)
Me.editemp_fname.Name = "editemp_fname"
Me.editemp_fname.ReadOnly = True
Me.editemp_fname.Size = New System.Drawing.Size(112, 26)
Me.editemp_fname.TabIndex = 84
Me.editemp_fname.Text = ""
'
'editemp_idno
'
Me.editemp_idno.BackColor = System.Drawing.SystemColors.Control
Me.editemp_idno.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.editemp_idno.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.objnewGenPayDS, "ePayroll.emp_idno"))
Me.editemp_idno.Location = New System.Drawing.Point(120, 8)
Me.editemp_idno.Name = "editemp_idno"
Me.editemp_idno.ReadOnly = True
Me.editemp_idno.Size = New System.Drawing.Size(112, 26)
Me.editemp_idno.TabIndex = 10
Me.editemp_idno.Text = ""
'
'editemp_pos
'
Me.editemp_pos.BackColor = System.Drawing.SystemColors.Control
Me.editemp_pos.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.editemp_pos.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.objnewGenPayDS, "ePayroll.emp_pos"))
Me.editemp_pos.Location = New System.Drawing.Point(120, 72)
Me.editemp_pos.Name = "editemp_pos"
Me.editemp_pos.ReadOnly = True
Me.editemp_pos.Size = New System.Drawing.Size(112, 26)
Me.editemp_pos.TabIndex = 12
Me.editemp_pos.Text = ""
'
'lblemp_stat
'
Me.lblemp_stat.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblemp_stat.Location = New System.Drawing.Point(248, 8)
Me.lblemp_stat.Name = "lblemp_stat"
Me.lblemp_stat.Size = New System.Drawing.Size(104, 23)
Me.lblemp_stat.TabIndex = 13
Me.lblemp_stat.Text = "Employee Status:"
Me.lblemp_stat.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'lblpayDate
'
Me.lblpayDate.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblpayDate.Location = New System.Drawing.Point(296, 40)
Me.lblpayDate.Name = "lblpayDate"
Me.lblpayDate.Size = New System.Drawing.Size(56, 23)
Me.lblpayDate.TabIndex = 15
Me.lblpayDate.Text = "Pay Date:"
Me.lblpayDate.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'lblpayID
'
Me.lblpayID.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblpayID.Location = New System.Drawing.Point(280, 72)
Me.lblpayID.Name = "lblpayID"
Me.lblpayID.Size = New System.Drawing.Size(72, 23)
Me.lblpayID.TabIndex = 16
Me.lblpayID.Text = "Payroll ID#:"
Me.lblpayID.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'lblwHours
'
Me.lblwHours.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblwHours.Location = New System.Drawing.Point(488, 8)
Me.lblwHours.Name = "lblwHours"
Me.lblwHours.Size = New System.Drawing.Size(88, 23)
Me.lblwHours.TabIndex = 17
Me.lblwHours.Text = "Hours Worked:"
Me.lblwHours.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'editemp_stat
'
Me.editemp_stat.BackColor = System.Drawing.SystemColors.Control
Me.editemp_stat.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.editemp_stat.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.objnewGenPayDS, "ePayroll.emp_stat"))
Me.editemp_stat.Location = New System.Drawing.Point(360, 8)
Me.editemp_stat.Name = "editemp_stat"
Me.editemp_stat.ReadOnly = True
Me.editemp_stat.Size = New System.Drawing.Size(112, 26)
Me.editemp_stat.TabIndex = 18
Me.editemp_stat.Text = ""
'
'editnetPay
'
Me.editnetPay.BackColor = System.Drawing.Color.Black
Me.editnetPay.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.editnetPay.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.objnewGenPayDS, "ePayroll.netPay"))
Me.editnetPay.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.editnetPay.ForeColor = System.Drawing.Color.White
Me.editnetPay.Location = New System.Drawing.Point(584, 144)
Me.editnetPay.Name = "editnetPay"
Me.editnetPay.Size = New System.Drawing.Size(112, 19)
Me.editnetPay.TabIndex = 19
Me.editnetPay.Text = ""
Me.editnetPay.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
'
'editpayDate
'
Me.editpayDate.BackColor = System.Drawing.SystemColors.Control
Me.editpayDate.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.editpayDate.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.objnewGenPayDS, "ePayroll.payDate"))
Me.editpayDate.Location = New System.Drawing.Point(360, 40)
Me.editpayDate.Name = "editpayDate"
Me.editpayDate.ReadOnly = True
Me.editpayDate.Size = New System.Drawing.Size(112, 26)
Me.editpayDate.TabIndex = 20
Me.editpayDate.Text = ""
'
'editpayID
'
Me.editpayID.BackColor = System.Drawing.SystemColors.Control
Me.editpayID.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.editpayID.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.objnewGenPayDS, "ePayroll.payID"))
Me.editpayID.Location = New System.Drawing.Point(360, 72)
Me.editpayID.Name = "editpayID"
Me.editpayID.ReadOnly = True
Me.editpayID.Size = New System.Drawing.Size(112, 26)
Me.editpayID.TabIndex = 21
Me.editpayID.Text = ""
'
'editwHours
'
Me.editwHours.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.editwHours.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.objnewGenPayDS, "ePayroll.wHours"))
Me.editwHours.Location = New System.Drawing.Point(584, 8)
Me.editwHours.Name = "editwHours"
Me.editwHours.Size = New System.Drawing.Size(112, 26)
Me.editwHours.TabIndex = 22
Me.editwHours.Text = ""
'
'btnNavFirst
'
Me.btnNavFirst.Location = New System.Drawing.Point(224, 120)
Me.btnNavFirst.Name = "btnNavFirst"
Me.btnNavFirst.Size = New System.Drawing.Size(40, 23)
Me.btnNavFirst.TabIndex = 77
Me.btnNavFirst.Text = "<<"
'
'btnNavPrev
'
Me.btnNavPrev.Location = New System.Drawing.Point(264, 120)
Me.btnNavPrev.Name = "btnNavPrev"
Me.btnNavPrev.Size = New System.Drawing.Size(35, 23)
Me.btnNavPrev.TabIndex = 77
Me.btnNavPrev.Text = "<"
'
'lblNavLocation
'
Me.lblNavLocation.BackColor = System.Drawing.Color.White
Me.lblNavLocation.Location = New System.Drawing.Point(296, 120)
Me.lblNavLocation.Name = "lblNavLocation"
Me.lblNavLocation.Size = New System.Drawing.Size(95, 23)
Me.lblNavLocation.TabIndex = 77
Me.lblNavLocation.Text = "No Records"
Me.lblNavLocation.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
'
'btnNavNext
'
Me.btnNavNext.Location = New System.Drawing.Point(392, 120)
Me.btnNavNext.Name = "btnNavNext"
Me.btnNavNext.Size = New System.Drawing.Size(35, 23)
Me.btnNavNext.TabIndex = 77
Me.btnNavNext.Text = ">"
'
'btnLast
'
Me.btnLast.Location = New System.Drawing.Point(424, 120)
Me.btnLast.Name = "btnLast"
Me.btnLast.Size = New System.Drawing.Size(40, 23)
Me.btnLast.TabIndex = 77
Me.btnLast.Text = ">>"
'
'btnDelete
'
Me.btnDelete.Location = New System.Drawing.Point(528, 0)
Me.btnDelete.Name = "btnDelete"
Me.btnDelete.TabIndex = 29
Me.btnDelete.Text = "&Delete"
'
'btnCancel
'
Me.btnCancel.Location = New System.Drawing.Point(392, 152)
Me.btnCancel.Name = "btnCancel"
Me.btnCancel.TabIndex = 77
Me.btnCancel.Text = "&Cancel"
'
'Button1
'
Me.Button1.BackColor = System.Drawing.Color.Chocolate
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -