?? 酒水點菜.frm
字號:
VERSION 5.00
Object = "{FAEEE763-117E-101B-8933-08002B2F4F5A}#1.1#0"; "DBLIST32.OCX"
Begin VB.Form 酒水點菜
BackColor = &H8000000B&
BorderStyle = 3 'Fixed Dialog
ClientHeight = 7305
ClientLeft = 2760
ClientTop = 3750
ClientWidth = 11340
KeyPreview = -1 'True
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
Moveable = 0 'False
Picture = "酒水點菜.frx":0000
ScaleHeight = 7305
ScaleWidth = 11340
ShowInTaskbar = 0 'False
StartUpPosition = 2 '屏幕中心
Begin VB.Data Data3
Caption = "Data3"
Connect = "Access"
DatabaseName = "C:\科研\酒吧管理數據庫.mdb"
DefaultCursorType= 0 '缺省游標
DefaultType = 2 '使用 ODBC
Exclusive = 0 'False
Height = 345
Left = -360
Options = 0
ReadOnly = 0 'False
RecordsetType = 1 'Dynaset
RecordSource = "消費記錄"
Top = 120
Visible = 0 'False
Width = 1140
End
Begin VB.CommandButton Command1
Caption = "確定"
BeginProperty Font
Name = "隸書"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 390
Left = 9765
Picture = "酒水點菜.frx":10D1EC
TabIndex = 58
Top = 6210
Width = 1185
End
Begin VB.Data Data2
Caption = "Data2"
Connect = "Access"
DatabaseName = "C:\科研\酒吧管理數據庫.mdb"
DefaultCursorType= 0 '缺省游標
DefaultType = 2 '使用 ODBC
Exclusive = 0 'False
Height = 345
Left = -720
Options = 0
ReadOnly = 0 'False
RecordsetType = 1 'Dynaset
RecordSource = "客戶檔案"
Top = 120
Visible = 0 'False
Width = 1140
End
Begin VB.Data Data1
Caption = "Data1"
Connect = "Access"
DatabaseName = "C:\科研\酒吧管理數據庫.mdb"
DefaultCursorType= 0 '缺省游標
DefaultType = 2 '使用 ODBC
Exclusive = 0 'False
Height = 345
Left = -720
Options = 0
ReadOnly = 0 'False
RecordsetType = 1 'Dynaset
RecordSource = "酒水庫存"
Top = 120
Visible = 0 'False
Width = 1140
End
Begin VB.Frame Frame1
BackColor = &H8000000D&
Height = 4260
Left = 263
TabIndex = 60
Top = 1710
Width = 10815
Begin VB.TextBox 備注
Appearance = 0 'Flat
BeginProperty Font
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 9
Left = 8640
TabIndex = 57
Top = 3855
Visible = 0 'False
Width = 2160
End
Begin VB.TextBox 合計
Appearance = 0 'Flat
Enabled = 0 'False
BeginProperty Font
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 9
Left = 6480
Locked = -1 'True
TabIndex = 56
Top = 3855
Visible = 0 'False
Width = 2160
End
Begin VB.TextBox 數量
Appearance = 0 'Flat
BeginProperty Font
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 9
Left = 4335
TabIndex = 55
Top = 3855
Visible = 0 'False
Width = 2160
End
Begin VB.TextBox 單價
Appearance = 0 'Flat
BeginProperty Font
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 9
Left = 2175
TabIndex = 54
Top = 3855
Visible = 0 'False
Width = 2160
End
Begin VB.TextBox 備注
Appearance = 0 'Flat
BeginProperty Font
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 8
Left = 8640
TabIndex = 52
Top = 3480
Visible = 0 'False
Width = 2160
End
Begin VB.TextBox 合計
Appearance = 0 'Flat
Enabled = 0 'False
BeginProperty Font
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 8
Left = 6480
Locked = -1 'True
TabIndex = 51
Top = 3480
Visible = 0 'False
Width = 2160
End
Begin VB.TextBox 數量
Appearance = 0 'Flat
BeginProperty Font
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 8
Left = 4335
TabIndex = 50
Top = 3480
Visible = 0 'False
Width = 2160
End
Begin VB.TextBox 單價
Appearance = 0 'Flat
BeginProperty Font
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 8
Left = 2175
TabIndex = 49
Top = 3480
Visible = 0 'False
Width = 2160
End
Begin VB.TextBox 備注
Appearance = 0 'Flat
BeginProperty Font
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 7
Left = 8640
TabIndex = 47
Top = 3126
Visible = 0 'False
Width = 2160
End
Begin VB.TextBox 合計
Appearance = 0 'Flat
Enabled = 0 'False
BeginProperty Font
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 7
Left = 6480
Locked = -1 'True
TabIndex = 46
Top = 3126
Visible = 0 'False
Width = 2160
End
Begin VB.TextBox 數量
Appearance = 0 'Flat
BeginProperty Font
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 7
Left = 4335
TabIndex = 45
Top = 3126
Visible = 0 'False
Width = 2160
End
Begin VB.TextBox 單價
Appearance = 0 'Flat
BeginProperty Font
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 7
Left = 2175
TabIndex = 44
Top = 3126
Visible = 0 'False
Width = 2160
End
Begin VB.TextBox 備注
Appearance = 0 'Flat
BeginProperty Font
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 6
Left = 8640
TabIndex = 42
Top = 2750
Visible = 0 'False
Width = 2160
End
Begin VB.TextBox 合計
Appearance = 0 'Flat
Enabled = 0 'False
BeginProperty Font
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 6
Left = 6480
Locked = -1 'True
TabIndex = 41
Top = 2750
Visible = 0 'False
Width = 2160
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -