📄 form1.frm
字号:
Left = 1680
TabIndex = 24
Top = 1320
Width = 855
End
Begin VB.TextBox Text3
BackColor = &H00C0FFC0&
Height = 270
Left = 1680
TabIndex = 23
Top = 960
Width = 855
End
Begin VB.TextBox Text2
BackColor = &H00FFC0C0&
Height = 270
Left = 1680
TabIndex = 22
Top = 600
Width = 855
End
Begin VB.CheckBox Check1
BackColor = &H00C0E0FF&
ForeColor = &H000000FF&
Height = 375
Left = 2880
MaskColor = &H00FF0000&
TabIndex = 21
Top = 120
Width = 255
End
Begin VB.TextBox Text1
BackColor = &H00C0FFC0&
Height = 270
Left = 1680
TabIndex = 20
Top = 240
Width = 855
End
Begin VB.Label Label12
BackColor = &H00C0FFC0&
BorderStyle = 1 'Fixed Single
Caption = " 经洛推拿"
ForeColor = &H00FF0000&
Height = 255
Left = 120
TabIndex = 14
Top = 1680
Width = 1290
End
Begin VB.Label Label11
BackColor = &H00FFC0C0&
BorderStyle = 1 'Fixed Single
Caption = " 韩式松骨"
ForeColor = &H00FF0000&
Height = 255
Left = 120
TabIndex = 13
Top = 4200
Width = 1290
End
Begin VB.Label Label10
BackColor = &H00C0FFC0&
BorderStyle = 1 'Fixed Single
Caption = " 欧式推油"
ForeColor = &H00FF0000&
Height = 255
Left = 120
TabIndex = 12
Top = 3840
Width = 1290
End
Begin VB.Label Label9
BackColor = &H00FFC0C0&
BorderStyle = 1 'Fixed Single
Caption = " 足 按"
ForeColor = &H00FF0000&
Height = 255
Left = 120
TabIndex = 11
Top = 3480
Width = 1290
End
Begin VB.Label Label8
BackColor = &H00C0FFC0&
BorderStyle = 1 'Fixed Single
Caption = " 采 耳"
ForeColor = &H00FF0000&
Height = 255
Left = 120
TabIndex = 10
Top = 3120
Width = 1290
End
Begin VB.Label Label7
BackColor = &H00FFC0C0&
BorderStyle = 1 'Fixed Single
Caption = " 修 脚"
ForeColor = &H00FF0000&
Height = 255
Left = 120
TabIndex = 9
Top = 2760
Width = 1290
End
Begin VB.Label Label6
BackColor = &H00C0FFC0&
BorderStyle = 1 'Fixed Single
Caption = " 刮 痧 "
ForeColor = &H00FF0000&
Height = 255
Left = 120
TabIndex = 8
Top = 2400
Width = 1290
End
Begin VB.Label Label5
BackColor = &H00FFC0C0&
BorderStyle = 1 'Fixed Single
Caption = " 推奶推盐"
ForeColor = &H00FF0000&
Height = 255
Left = 120
TabIndex = 7
Top = 2040
Width = 1290
End
Begin VB.Label Label4
BackColor = &H00FFC0C0&
BorderStyle = 1 'Fixed Single
Caption = " 泰式按摩"
ForeColor = &H00FF0000&
Height = 255
Left = 120
TabIndex = 6
Top = 1320
Width = 1295
End
Begin VB.Label Label3
BackColor = &H00C0FFC0&
BorderStyle = 1 'Fixed Single
Caption = " 港式按摩"
ForeColor = &H00FF0000&
Height = 255
Left = 120
TabIndex = 5
Top = 960
Width = 1295
End
Begin VB.Label Label1
BackColor = &H00C0FFC0&
BorderStyle = 1 'Fixed Single
Caption = " 搓 背"
ForeColor = &H00FF0000&
Height = 255
Left = 120
TabIndex = 4
Top = 240
Width = 1295
End
Begin VB.Label Label2
BackColor = &H00FFC0C0&
BorderStyle = 1 'Fixed Single
Caption = " 中式按摩"
ForeColor = &H00FF0000&
Height = 255
Left = 120
TabIndex = 3
Top = 600
Width = 1295
End
End
Begin VB.Image Image2
Height = 7095
Left = 9360
Picture = "Form1.frx":009E
Stretch = -1 'True
Top = 720
Width = 3015
End
Begin VB.Label Label25
BackColor = &H00C0E0FF&
Caption = "实际支付"
BeginProperty Font
Name = "楷体_GB2312"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 375
Left = 4560
TabIndex = 94
Top = 6960
Width = 975
End
Begin VB.Label Label23
BackColor = &H00C0E0FF&
Caption = "女 浴 馆"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 255
Left = 360
TabIndex = 63
Top = 3200
Width = 1095
End
Begin VB.Label Label22
BackColor = &H00C0E0FF&
Caption = "男 浴 馆"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 255
Left = 480
TabIndex = 62
Top = 240
Width = 1095
End
Begin VB.Label Label21
BackColor = &H00C0E0FF&
Caption = "收银员"
BeginProperty Font
Name = "楷体_GB2312"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 375
Left = 7200
TabIndex = 58
Top = 6600
Width = 735
End
Begin VB.Label Label20
BackColor = &H00C0E0FF&
Caption = "消费总额"
BeginProperty Font
Name = "楷体_GB2312"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 375
Left = 4560
TabIndex = 56
Top = 6600
Width = 975
End
Begin VB.Label Label19
BackColor = &H00C0E0FF&
Caption = "付款方式"
BeginProperty Font
Name = "楷体_GB2312"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 375
Left = 2040
TabIndex = 55
Top = 6600
Width = 975
End
Begin VB.Label Label15
Appearance = 0 'Flat
BackColor = &H80000005&
BackStyle = 0 'Transparent
Caption = "富 美 洗 浴 中 心"
BeginProperty Font
Name = "隶书"
Size = 24
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 615
Index = 1
Left = 2160
TabIndex = 0
Top = 120
Width = 6855
End
Begin VB.Line Line2
BorderColor = &H00FF0000&
BorderStyle = 3 'Dot
X1 = 9240
X2 = 2040
Y1 = 720
Y2 = 720
End
Begin VB.Line Line1
BorderColor = &H00FF0000&
Index = 2
X1 = 11880
X2 = 0
Y1 = 0
Y2 = 0
End
Begin VB.Line Line1
BorderColor = &H00FF0000&
Index = 1
X1 = 9120
X2 = 2040
Y1 = 6360
Y2 = 6360
End
Begin VB.Line Line1
BorderColor = &H00FF0000&
Index = 0
X1 = 9120
X2 = 2040
Y1 = 6240
Y2 = 6240
End
Begin VB.Menu mnusystem
Caption = " 系 统(&S)"
Begin VB.Menu mnuchangmima
Caption = "修改密码"
Shortcut = ^R
End
Begin VB.Menu mnu3
Caption = "-"
Index = 3
End
Begin VB.Menu mnuaddworker
Caption = "增加员工"
Shortcut = ^A
End
Begin VB.Menu mnudeleteworker
Caption = "删除员工"
Shortcut = ^D
End
Begin VB.Menu mnu4
Caption = "-"
End
Begin VB.Menu mnuadditem
Caption = "服务项目修改"
Shortcut = ^S
End
Begin VB.Menu mnudeletitem
Caption = "增删消费项目"
Shortcut = ^I
End
Begin VB.Menu mnu5
Caption = "-"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -