📄 genpayr.vb
字号:
Me.Button1.Cursor = System.Windows.Forms.Cursors.Default
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Button1.ForeColor = System.Drawing.SystemColors.ControlText
Me.Button1.Location = New System.Drawing.Point(221, 400)
Me.Button1.Name = "Button1"
Me.Button1.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.Button1.Size = New System.Drawing.Size(127, 24)
Me.Button1.TabIndex = 87
Me.Button1.Text = "&Close PayRoll"
'
'frm_budget
'
Me.frm_budget.BackColor = System.Drawing.SystemColors.Control
Me.frm_budget.Controls.Add(Me.cmd_computebudget)
Me.frm_budget.Controls.Add(Me.cmd_return)
Me.frm_budget.Controls.Add(Me.cmd_clearBudget)
Me.frm_budget.Controls.Add(Me.txt_entertain)
Me.frm_budget.Controls.Add(Me.txt_clothing)
Me.frm_budget.Controls.Add(Me.txt_utils)
Me.frm_budget.Controls.Add(Me.txt_food)
Me.frm_budget.Controls.Add(Me.txt_transport)
Me.frm_budget.Controls.Add(Me.txt_housing)
Me.frm_budget.Controls.Add(Me.lbl_surplusamount)
Me.frm_budget.Controls.Add(Me.Label22)
Me.frm_budget.Controls.Add(Me.lbl_surplus)
Me.frm_budget.Controls.Add(Me.lbl_entertain)
Me.frm_budget.Controls.Add(Me.lbl_clothing)
Me.frm_budget.Controls.Add(Me.lbl_utils)
Me.frm_budget.Controls.Add(Me.lbl_food)
Me.frm_budget.Controls.Add(Me.lbl_transport)
Me.frm_budget.Controls.Add(Me.lbl_housing)
Me.frm_budget.Controls.Add(Me.Label21)
Me.frm_budget.Controls.Add(Me.Label20)
Me.frm_budget.Controls.Add(Me.Label19)
Me.frm_budget.Controls.Add(Me.Label18)
Me.frm_budget.Controls.Add(Me.Label17)
Me.frm_budget.Controls.Add(Me.Label16)
Me.frm_budget.Controls.Add(Me.Label15)
Me.frm_budget.Controls.Add(Me.Label14)
Me.frm_budget.Controls.Add(Me.Label13)
Me.frm_budget.Controls.Add(Me.Line8)
Me.frm_budget.Controls.Add(Me.Label12)
Me.frm_budget.Controls.Add(Me.Label11)
Me.frm_budget.Controls.Add(Me.Label10)
Me.frm_budget.Controls.Add(Me.Label9)
Me.frm_budget.Controls.Add(Me.Label4)
Me.frm_budget.Controls.Add(Me.Label3)
Me.frm_budget.Controls.Add(Me.Label2)
Me.frm_budget.Controls.Add(Me.Label1)
Me.frm_budget.Font = New System.Drawing.Font("Trebuchet MS", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.frm_budget.ForeColor = System.Drawing.SystemColors.ControlText
Me.frm_budget.Location = New System.Drawing.Point(0, 104)
Me.frm_budget.Name = "frm_budget"
Me.frm_budget.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.frm_budget.Size = New System.Drawing.Size(688, 264)
Me.frm_budget.TabIndex = 89
Me.frm_budget.TabStop = False
Me.frm_budget.Visible = False
'
'cmd_computebudget
'
Me.cmd_computebudget.BackColor = System.Drawing.Color.Chocolate
Me.cmd_computebudget.Cursor = System.Windows.Forms.Cursors.Default
Me.cmd_computebudget.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.cmd_computebudget.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cmd_computebudget.ForeColor = System.Drawing.Color.Black
Me.cmd_computebudget.Location = New System.Drawing.Point(169, 488)
Me.cmd_computebudget.Name = "cmd_computebudget"
Me.cmd_computebudget.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.cmd_computebudget.Size = New System.Drawing.Size(127, 24)
Me.cmd_computebudget.TabIndex = 16
Me.cmd_computebudget.Text = "Compute &Budget"
'
'cmd_return
'
Me.cmd_return.BackColor = System.Drawing.Color.Chocolate
Me.cmd_return.Cursor = System.Windows.Forms.Cursors.Default
Me.cmd_return.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.cmd_return.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cmd_return.ForeColor = System.Drawing.Color.Black
Me.cmd_return.Location = New System.Drawing.Point(457, 488)
Me.cmd_return.Name = "cmd_return"
Me.cmd_return.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.cmd_return.Size = New System.Drawing.Size(127, 24)
Me.cmd_return.TabIndex = 14
Me.cmd_return.Text = "&Return to Paycheck"
'
'cmd_clearBudget
'
Me.cmd_clearBudget.BackColor = System.Drawing.Color.Chocolate
Me.cmd_clearBudget.Cursor = System.Windows.Forms.Cursors.Default
Me.cmd_clearBudget.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.cmd_clearBudget.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cmd_clearBudget.ForeColor = System.Drawing.Color.Black
Me.cmd_clearBudget.Location = New System.Drawing.Point(313, 488)
Me.cmd_clearBudget.Name = "cmd_clearBudget"
Me.cmd_clearBudget.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.cmd_clearBudget.Size = New System.Drawing.Size(127, 24)
Me.cmd_clearBudget.TabIndex = 15
Me.cmd_clearBudget.Text = "Clear Bud&get"
'
'txt_entertain
'
Me.txt_entertain.AcceptsReturn = True
Me.txt_entertain.AutoSize = False
Me.txt_entertain.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
Me.txt_entertain.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.txt_entertain.Cursor = System.Windows.Forms.Cursors.IBeam
Me.txt_entertain.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txt_entertain.ForeColor = System.Drawing.SystemColors.WindowText
Me.txt_entertain.Location = New System.Drawing.Point(280, 368)
Me.txt_entertain.MaxLength = 0
Me.txt_entertain.Name = "txt_entertain"
Me.txt_entertain.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.txt_entertain.Size = New System.Drawing.Size(128, 19)
Me.txt_entertain.TabIndex = 102
Me.txt_entertain.Text = "10"
Me.txt_entertain.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
'txt_clothing
'
Me.txt_clothing.AcceptsReturn = True
Me.txt_clothing.AutoSize = False
Me.txt_clothing.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
Me.txt_clothing.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.txt_clothing.Cursor = System.Windows.Forms.Cursors.IBeam
Me.txt_clothing.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txt_clothing.ForeColor = System.Drawing.SystemColors.WindowText
Me.txt_clothing.Location = New System.Drawing.Point(280, 320)
Me.txt_clothing.MaxLength = 0
Me.txt_clothing.Name = "txt_clothing"
Me.txt_clothing.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.txt_clothing.Size = New System.Drawing.Size(128, 19)
Me.txt_clothing.TabIndex = 101
Me.txt_clothing.Text = "10"
Me.txt_clothing.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
'txt_utils
'
Me.txt_utils.AcceptsReturn = True
Me.txt_utils.AutoSize = False
Me.txt_utils.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
Me.txt_utils.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.txt_utils.Cursor = System.Windows.Forms.Cursors.IBeam
Me.txt_utils.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txt_utils.ForeColor = System.Drawing.SystemColors.WindowText
Me.txt_utils.Location = New System.Drawing.Point(280, 272)
Me.txt_utils.MaxLength = 0
Me.txt_utils.Name = "txt_utils"
Me.txt_utils.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.txt_utils.Size = New System.Drawing.Size(128, 19)
Me.txt_utils.TabIndex = 100
Me.txt_utils.Text = "10"
Me.txt_utils.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
'txt_food
'
Me.txt_food.AcceptsReturn = True
Me.txt_food.AutoSize = False
Me.txt_food.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
Me.txt_food.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.txt_food.Cursor = System.Windows.Forms.Cursors.IBeam
Me.txt_food.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txt_food.ForeColor = System.Drawing.SystemColors.WindowText
Me.txt_food.Location = New System.Drawing.Point(280, 224)
Me.txt_food.MaxLength = 0
Me.txt_food.Name = "txt_food"
Me.txt_food.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.txt_food.Size = New System.Drawing.Size(128, 19)
Me.txt_food.TabIndex = 99
Me.txt_food.Text = "20"
Me.txt_food.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
'txt_transport
'
Me.txt_transport.AcceptsReturn = True
Me.txt_transport.AutoSize = False
Me.txt_transport.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
Me.txt_transport.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.txt_transport.Cursor = System.Windows.Forms.Cursors.IBeam
Me.txt_transport.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txt_transport.ForeColor = System.Drawing.SystemColors.WindowText
Me.txt_transport.Location = New System.Drawing.Point(280, 184)
Me.txt_transport.MaxLength = 0
Me.txt_transport.Name = "txt_transport"
Me.txt_transport.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.txt_transport.Size = New System.Drawing.Size(128, 19)
Me.txt_transport.TabIndex = 98
Me.txt_transport.Text = "20"
Me.txt_transport.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
'txt_housing
'
Me.txt_housing.AcceptsReturn = True
Me.txt_housing.AutoSize = False
Me.txt_housing.BackColor = System.Drawing.Color.FromArgb(CType(224, Byte), CType(224, Byte), CType(224, Byte))
Me.txt_housing.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.txt_housing.Cursor = System.Windows.Forms.Cursors.IBeam
Me.txt_housing.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txt_housing.ForeColor = System.Drawing.SystemColors.WindowText
Me.txt_housing.Location = New System.Drawing.Point(280, 136)
Me.txt_housing.MaxLength = 0
Me.txt_housing.Name = "txt_housing"
Me.txt_housing.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.txt_housing.Size = New System.Drawing.Size(128, 19)
Me.txt_housing.TabIndex = 97
Me.txt_housing.Text = "30"
Me.txt_housing.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
'lbl_surplusamount
'
Me.lbl_surplusamount.BackColor = System.Drawing.Color.Transparent
Me.lbl_surplusamount.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.lbl_surplusamount.Cursor = System.Windows.Forms.Cursors.Default
Me.lbl_surplusamount.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lbl_surplusamount.ForeColor = System.Drawing.Color.Black
Me.lbl_surplusamount.Location = New System.Drawing.Point(452, 424)
Me.lbl_surplusamount.Name = "lbl_surplusamount"
Me.lbl_surplusamount.RightToLeft = System.Windows.Forms.RightToLeft.No
Me.lbl_surplusamount.Size = New System.Drawing.Size(121, 19)
Me.lbl_surplusamount.TabIndex = 117
Me.lbl_surplusamount.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'Label22
'
Me.Label22.BackColor = System.Drawing.Color.Transparent
Me.Label22.Cursor = System.Windows.Forms.Cursors.Default
Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -