📄 frmqtyy.frm
字号:
TabIndex = 23
Text = "Text1"
Top = 3300
Width = 1005
End
Begin VB.TextBox TxtGet_gm
Appearance = 0 'Flat
BackColor = &H00C0FFFF&
Enabled = 0 'False
Height = 285
Left = 5940
TabIndex = 22
Text = "Text1"
Top = 3660
Width = 1005
End
Begin VB.ComboBox Combo1_gm
Appearance = 0 'Flat
BackColor = &H00C0FFFF&
Enabled = 0 'False
Height = 315
ItemData = "frmqtyy.frx":2A132
Left = 8100
List = "frmqtyy.frx":2A134
TabIndex = 21
Text = "Combo1"
Top = 3270
Width = 945
End
Begin VB.TextBox TxtGetFact_gm
Appearance = 0 'Flat
BackColor = &H00C0FFFF&
Height = 285
Left = 5940
TabIndex = 20
Text = "Text1"
Top = 4050
Width = 1005
End
Begin VB.TextBox TxtRoomMoney_gm
Appearance = 0 'Flat
BackColor = &H00C0FFFF&
Height = 285
Left = 8100
TabIndex = 19
Text = "Text1"
Top = 3690
Width = 945
End
Begin VB.TextBox TxtRate_gm
Appearance = 0 'Flat
BackColor = &H00C0FFFF&
Enabled = 0 'False
Height = 285
Left = 8100
TabIndex = 18
Text = "100.00"
Top = 4050
Width = 945
End
Begin VB.TextBox TxtSyRen_gm
Appearance = 0 'Flat
BackColor = &H00C0FFFF&
Enabled = 0 'False
Height = 285
Left = 5940
TabIndex = 17
Text = "Text1"
Top = 4470
Width = 1005
End
Begin VB.TextBox TxtFwy_gm
Appearance = 0 'Flat
BackColor = &H00C0FFFF&
Enabled = 0 'False
Height = 285
Left = 8100
TabIndex = 16
Text = "Text1"
Top = 4470
Width = 945
End
Begin VB.CommandButton cmdHy_gm
Appearance = 0 'Flat
BeginProperty Font
Name = "MS Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 450
Left = 4800
Picture = "frmqtyy.frx":2A136
Style = 1 'Graphical
TabIndex = 15
Top = 4980
Width = 1455
End
Begin VB.CommandButton cmdZp_gm
Appearance = 0 'Flat
BeginProperty Font
Name = "MS Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 450
Left = 6240
Picture = "frmqtyy.frx":2A905
Style = 1 'Graphical
TabIndex = 14
Top = 4980
Width = 1455
End
Begin VB.CommandButton cmdGz_gm
Appearance = 0 'Flat
BeginProperty Font
Name = "MS Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 450
Left = 7680
Picture = "frmqtyy.frx":2B15F
Style = 1 'Graphical
TabIndex = 13
Top = 4980
Width = 1455
End
Begin VB.CommandButton cmdMd_gm
Appearance = 0 'Flat
BeginProperty Font
Name = "MS Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 450
Left = 4800
Picture = "frmqtyy.frx":2B95E
Style = 1 'Graphical
TabIndex = 12
Top = 5580
Width = 1455
End
Begin VB.CommandButton cmdDz_gm
Appearance = 0 'Flat
BeginProperty Font
Name = "MS Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 450
Left = 6240
Picture = "frmqtyy.frx":2C138
Style = 1 'Graphical
TabIndex = 11
Top = 5580
Width = 1455
End
Begin VB.CommandButton cmdEnt_gm
Appearance = 0 'Flat
BeginProperty Font
Name = "MS Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 450
Left = 7680
Picture = "frmqtyy.frx":2C915
Style = 1 'Graphical
TabIndex = 10
Top = 5580
Width = 1455
End
Begin VB.CommandButton cmdExit_gm
Appearance = 0 'Flat
BeginProperty Font
Name = "MS Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 450
Left = 6240
Picture = "frmqtyy.frx":2D109
Style = 1 'Graphical
TabIndex = 9
Top = 6180
Width = 1455
End
Begin MSComCtl2.DTPicker DtpKtDate_gm
Height = 285
Left = 1110
TabIndex = 46
Top = 570
Width = 1305
_ExtentX = 2302
_ExtentY = 503
_Version = 393216
Enabled = 0 'False
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "MS Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Format = 24838145
CurrentDate = 37417
End
Begin MSFlexGridLib.MSFlexGrid GrdMenu_gm
Height = 2235
Index = 0
Left = 30
TabIndex = 47
Top = 1230
Width = 4635
_ExtentX = 8176
_ExtentY = 3942
_Version = 393216
FixedCols = 0
SelectionMode = 1
End
Begin MSFlexGridLib.MSFlexGrid GrdMenu_gm
Height = 2175
Index = 1
Left = 30
TabIndex = 48
Top = 3810
Width = 4635
_ExtentX = 8176
_ExtentY = 3836
_Version = 393216
FixedCols = 0
SelectionMode = 1
End
Begin VB.Label Label2
BackStyle = 0 'Transparent
Caption = "房 间："
Height = 225
Index = 1
Left = 150
TabIndex = 66
Top = 270
Width = 945
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "桌 号："
Height = 225
Index = 4
Left = 2520
TabIndex = 65
Top = 270
Width = 915
End
Begin VB.Label Label3
Alignment = 2 'Center
BackStyle = 0 'Transparent
Caption = "开台时间："
Height = 225
Index = 2
Left = 120
TabIndex = 64
Top = 630
Width = 1005
End
Begin VB.Label Label5
BackStyle = 0 'Transparent
Caption = "合计金额："
Enabled = 0 'False
Height = 225
Index = 2
Left = 2520
TabIndex = 63
Top = 960
Width = 915
End
Begin VB.Label Label6
BackStyle = 0 'Transparent
Caption = "消费清单："
Height = 225
Index = 1
Left = 180
TabIndex = 62
Top = 960
Width = 945
End
Begin VB.Label Label8
BackStyle = 0 'Transparent
Caption = "合计金额："
Height = 225
Index = 2
Left = 2520
TabIndex = 61
Top = 3540
Width = 915
End
Begin VB.Label Label9
BackStyle = 0 'Transparent
Caption = "赠送清单："
Height = 225
Index = 1
Left = 150
TabIndex = 60
Top = 3540
Width = 1005
End
Begin VB.Label Label16
Alignment = 2 'Center
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -