📄 餐厅收银form.frm
字号:
Left = 3930
TabIndex = 107
Top = 2505
Width = 1005
End
Begin VB.Label Label37
BackStyle = 0 'Transparent
Caption = "烟 类："
ForeColor = &H0000FFFF&
Height = 255
Left = 3930
TabIndex = 106
Top = 2100
Width = 1005
End
Begin VB.Label Label36
BackStyle = 0 'Transparent
Caption = "酒水类："
ForeColor = &H0000FFFF&
Height = 255
Left = 3915
TabIndex = 105
Top = 1725
Width = 1005
End
Begin VB.Label Label35
BackStyle = 0 'Transparent
Caption = "饮料类："
ForeColor = &H0000FFFF&
Height = 255
Left = 3915
TabIndex = 104
Top = 1305
Width = 1005
End
Begin VB.Label Label34
BackStyle = 0 'Transparent
Caption = "食品类："
ForeColor = &H0000FFFF&
Height = 255
Left = 3930
TabIndex = 103
Top = 885
Width = 1005
End
Begin VB.Line Line8
X1 = 135
X2 = 6705
Y1 = 585
Y2 = 585
End
Begin VB.Line Line7
X1 = 3330
X2 = 3330
Y1 = 585
Y2 = 3015
End
Begin VB.Label Label14
BackStyle = 0 'Transparent
Caption = "结帐操作"
BeginProperty Font
Name = "宋体"
Size = 18
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FFFF00&
Height = 390
Left = 2715
TabIndex = 46
Top = 135
Width = 1500
End
Begin VB.Label Label13
BackStyle = 0 'Transparent
Caption = "打折批准人："
ForeColor = &H0000FFFF&
Height = 255
Left = 555
TabIndex = 45
Top = 2565
Width = 1365
End
Begin VB.Line Line1
X1 = 195
X2 = 6630
Y1 = 3015
Y2 = 3015
End
Begin VB.Label Label11
BackStyle = 0 'Transparent
Caption = "实收金额："
ForeColor = &H0000FFFF&
Height = 255
Left = 735
TabIndex = 42
Top = 2100
Width = 990
End
Begin VB.Label Label10
BackStyle = 0 'Transparent
Caption = "折扣金额："
ForeColor = &H0000FFFF&
Height = 255
Left = 795
TabIndex = 41
Top = 795
Width = 1005
End
Begin VB.Label Label4
BackStyle = 0 'Transparent
Caption = "顾客结帐方式："
ForeColor = &H0000FFFF&
Height = 255
Left = 360
TabIndex = 29
Top = 1575
Width = 1365
End
End
Begin MSAdodcLib.Adodc Adodc6
Height = 645
Left = 0
Top = 5235
Visible = 0 'False
Width = 1395
_ExtentX = 2461
_ExtentY = 1138
ConnectMode = 0
CursorLocation = 3
IsolationLevel = -1
ConnectionTimeout= 15
CommandTimeout = 30
CursorType = 3
LockType = 3
CommandType = 8
CursorOptions = 0
CacheSize = 50
MaxRecords = 0
BOFAction = 0
EOFAction = 0
ConnectStringType= 1
Appearance = 1
BackColor = -2147483643
ForeColor = -2147483640
Orientation = 0
Enabled = -1
Connect = ""
OLEDBString = ""
OLEDBFile = ""
DataSourceName = ""
OtherAttributes = ""
UserName = ""
Password = ""
RecordSource = ""
Caption = "Adodc6"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
_Version = 393216
End
Begin VB.PictureBox Picture7
Appearance = 0 'Flat
BackColor = &H00FF8080&
ForeColor = &H80000008&
Height = 2820
Left = 2130
ScaleHeight = 2790
ScaleWidth = 4800
TabIndex = 83
Top = 3885
Visible = 0 'False
Width = 4830
Begin VB.Frame Frame3
BackColor = &H00FF8080&
Height = 450
Left = 75
TabIndex = 97
Top = 1755
Width = 4515
Begin VB.OptionButton Option5
BackColor = &H00FF8080&
Caption = "其他类"
Height = 180
Left = 3480
TabIndex = 102
Top = 195
Width = 945
End
Begin VB.OptionButton Option4
BackColor = &H00FF8080&
Caption = "烟"
Height = 180
Left = 2625
TabIndex = 101
Top = 195
Width = 780
End
Begin VB.OptionButton Option3
BackColor = &H00FF8080&
Caption = "酒水"
Height = 180
Left = 1785
TabIndex = 100
Top = 195
Width = 780
End
Begin VB.OptionButton Option2
BackColor = &H00FF8080&
Caption = "饮料"
Height = 180
Left = 930
TabIndex = 99
Top = 195
Width = 780
End
Begin VB.OptionButton Option1
BackColor = &H00FF8080&
Caption = "食品"
Height = 180
Left = 150
TabIndex = 98
Top = 195
Value = -1 'True
Width = 780
End
End
Begin VB.TextBox Text24
Alignment = 1 'Right Justify
Height = 330
Left = 1590
TabIndex = 87
Text = "0"
Top = 1350
Width = 1170
End
Begin VB.CommandButton Command19
Caption = "&q取消"
Height = 270
Left = 2595
TabIndex = 92
Top = 2370
Width = 750
End
Begin VB.CommandButton Command18
Caption = "&s保存"
Height = 270
Left = 1200
TabIndex = 91
Top = 2370
Width = 750
End
Begin VB.TextBox Text23
Height = 330
Left = 1590
MaxLength = 6
TabIndex = 86
Top = 975
Width = 1170
End
Begin VB.TextBox Text22
Height = 330
Left = 1590
MaxLength = 20
TabIndex = 85
Top = 615
Width = 2190
End
Begin VB.TextBox Text21
Height = 330
Left = 1590
MaxLength = 6
TabIndex = 84
Top = 240
Width = 1155
End
Begin VB.Label Label31
BackStyle = 0 'Transparent
Caption = "单价："
ForeColor = &H00FFFFFF&
Height = 255
Left = 1035
TabIndex = 93
Top = 1410
Width = 660
End
Begin VB.Label Label30
BackStyle = 0 'Transparent
Caption = "单位："
ForeColor = &H00FFFFFF&
Height = 255
Left = 1035
TabIndex = 90
Top = 1035
Width = 660
End
Begin VB.Label Label29
BackStyle = 0 'Transparent
Caption = "菜名："
ForeColor = &H00FFFFFF&
Height = 255
Left = 1020
TabIndex = 89
Top = 660
Width = 660
End
Begin VB.Label Label28
BackStyle = 0 'Transparent
Caption = "菜名首字简拼："
ForeColor = &H00FFFFFF&
Height = 255
Left = 300
TabIndex = 88
Top = 285
Width = 1275
End
End
Begin VB.PictureBox Picture6
Appearance = 0 'Flat
BackColor = &H00FF8080&
ForeColor = &H80000008&
Height = 2835
Left = 3585
ScaleHeight = 2805
ScaleWidth = 4050
TabIndex = 74
Top = 1815
Visible = 0 'False
Width = 4080
Begin VB.TextBox Text25
Alignment = 1 'Right Justify
Height = 300
Left = 1695
TabIndex = 95
Top = 1710
Width = 1440
End
Begin VB.TextBox Text20
Alignment = 1 'Right Justify
Height = 300
Left = 1695
TabIndex = 81
Text = "0"
Top = 1335
Width = 1440
End
Begin VB.TextBox Text19
Height = 300
Left = 1695
Locked = -1 'True
TabIndex = 79
Top = 960
Width = 1440
End
Begin VB.CommandButton Command16
Caption = "取消"
Height = 300
Left = 2505
TabIndex = 77
Top = 2370
Width = 855
End
Begin VB.CommandButton Command15
Caption = "确认"
Height = 300
Left = 735
TabIndex = 76
Top = 2370
Width = 855
End
Begin VB.Label Label33
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -