📄 frmbookfind.frm
字号:
VERSION 5.00
Object = "{29743316-0803-11D5-AD8E-0050BAA9AC14}#8.1#0"; "MOVEFO~1.OCX"
Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "mscomct2.ocx"
Begin VB.Form frmBookFind
BorderStyle = 3 'Fixed Dialog
Caption = "预订查询"
ClientHeight = 3210
ClientLeft = 45
ClientTop = 330
ClientWidth = 6870
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Icon = "frmBookFind.frx":0000
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 3210
ScaleWidth = 6870
ShowInTaskbar = 0 'False
StartUpPosition = 3 '窗口缺省
Begin VB.CommandButton cmdClose
Cancel = -1 'True
Caption = "放弃(&C)"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 420
Left = 5460
TabIndex = 10
ToolTipText = "取消查找"
Top = 2505
Width = 1245
End
Begin VB.CommandButton cmdFind
Caption = "查询(&F)"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 420
Left = 4185
TabIndex = 9
ToolTipText = "单击开始查找"
Top = 2505
Width = 1245
End
Begin VB.Frame Frame1
Caption = "请输入查询条件"
BeginProperty Font
Name = "宋体"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 2235
Left = 180
TabIndex = 11
Top = 210
Width = 6510
Begin VB.ComboBox cmbDatePart
Height = 360
ItemData = "frmBookFind.frx":08CA
Left = 1245
List = "frmBookFind.frx":08D7
Style = 2 'Dropdown List
TabIndex = 8
Top = 1665
Width = 1965
End
Begin VB.CommandButton cmdSelectMember
Height = 255
Left = 2835
Picture = "frmBookFind.frx":08ED
Style = 1 'Graphical
TabIndex = 3
ToolTipText = "选择会员编号"
Top = 915
Width = 345
End
Begin 给出焦点文本框.FocusText ftNO
Height = 300
Left = 1245
TabIndex = 0
ToolTipText = "只能选择"
Top = 480
Width = 1965
_ExtentX = 3466
_ExtentY = 529
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
BorderStyle = 0
PreControl = "cmdFind"
NextControl = "ftClass"
End
Begin 给出焦点文本框.FocusText ftClass
Height = 300
Left = 4560
TabIndex = 1
ToolTipText = "输入桌号，按回车键加入。"
Top = 465
Width = 1725
_ExtentX = 3043
_ExtentY = 529
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
BorderStyle = 0
PreControl = "ftNO"
NextControl = "ftCID"
End
Begin 给出焦点文本框.FocusText ftCName
Height = 300
Left = 4560
TabIndex = 4
Top = 900
Width = 1725
_ExtentX = 3043
_ExtentY = 529
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
BorderStyle = 0
PreControl = "ftCID"
NextControl = "ftTel"
End
Begin 给出焦点文本框.FocusText ftTel
Height = 300
Left = 1245
TabIndex = 5
Top = 1290
Width = 1965
_ExtentX = 3466
_ExtentY = 529
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
BorderStyle = 0
PreControl = "ftCName"
NextControl = "cmdFInd"
End
Begin 给出焦点文本框.FocusText ftCID
Height = 300
Left = 1245
TabIndex = 2
ToolTipText = "只能选择"
Top = 900
Width = 1965
_ExtentX = 3466
_ExtentY = 529
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
BorderStyle = 0
PreControl = "ftClass"
NextControl = "ftCName"
End
Begin MSComCtl2.DTPicker dtpExpireDate
Height = 300
Left = 4560
TabIndex = 6
ToolTipText = "预订的开始时间"
Top = 1290
Width = 1725
_ExtentX = 3043
_ExtentY = 529
_Version = 393216
Format = 60096513
CurrentDate = 37497
End
Begin MSComCtl2.DTPicker dtpExpireDate2
Height = 300
Left = 4560
TabIndex = 7
ToolTipText = "预订结束时间"
Top = 1695
Width = 1725
_ExtentX = 3043
_ExtentY = 529
_Version = 393216
Format = 60096513
CurrentDate = 37497
End
Begin VB.Label Label1
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "到："
BeginProperty Font
Name = "宋体"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 195
Index = 7
Left = 4245
TabIndex = 19
Top = 1740
Width = 390
End
Begin VB.Label Label1
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "就餐时间："
BeginProperty Font
Name = "宋体"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 195
Index = 6
Left = 345
TabIndex = 18
Top = 1755
Width = 975
End
Begin VB.Label Label1
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -