?? frmchooseguest.frm
字號:
VERSION 5.00
Object = "{29743316-0803-11D5-AD8E-0050BAA9AC14}#8.1#0"; "MOVEFO~1.OCX"
Begin VB.Form frmchooseGuest
BorderStyle = 3 'Fixed Dialog
ClientHeight = 6285
ClientLeft = 45
ClientTop = 330
ClientWidth = 8205
Icon = "frmchooseGuest.frx":0000
LinkTopic = "Form2"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 6285
ScaleWidth = 8205
ShowInTaskbar = 0 'False
StartUpPosition = 3 '窗口缺省
Begin VB.PictureBox picCustomer
BorderStyle = 0 'None
Height = 1290
Left = 90
ScaleHeight = 1290
ScaleWidth = 8055
TabIndex = 21
Top = 4875
Visible = 0 'False
Width = 8055
Begin VB.CheckBox chkQuery
Height = 255
Index = 4
Left = 2970
TabIndex = 14
ToolTipText = "是否為查詢條件"
Top = 510
Width = 255
End
Begin VB.CheckBox chkQuery
Height = 255
Index = 3
Left = 2970
TabIndex = 13
ToolTipText = "是否為查詢條件"
Top = 165
Width = 255
End
Begin VB.CheckBox chkQuery
Height = 255
Index = 2
Left = 285
TabIndex = 12
ToolTipText = "是否為查詢條件"
Top = 855
Width = 255
End
Begin VB.CheckBox chkQuery
Height = 255
Index = 1
Left = 285
TabIndex = 11
ToolTipText = "是否為查詢條件"
Top = 510
Width = 255
End
Begin VB.CheckBox chkQuery
Height = 255
Index = 0
Left = 285
TabIndex = 10
ToolTipText = "是否為查詢條件"
Top = 165
Width = 255
End
Begin VB.CommandButton cmdFind
Caption = "查找會員(&Find)"
BeginProperty Font
Name = "Arial"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 390
Left = 5610
TabIndex = 9
Top = 90
Width = 2310
End
Begin 給出焦點文本框.FocusText ftGuest
Height = 300
Index = 0
Left = 1050
TabIndex = 4
Top = 135
Width = 1725
_ExtentX = 3043
_ExtentY = 529
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
BorderStyle = 0
NextControl = "ftguest(1)"
End
Begin 給出焦點文本框.FocusText ftGuest
Height = 300
Index = 1
Left = 1050
TabIndex = 5
Top = 480
Width = 1725
_ExtentX = 3043
_ExtentY = 529
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
BorderStyle = 0
PreControl = "ftguest(0)"
NextControl = "ftguest(2)"
End
Begin 給出焦點文本框.FocusText ftGuest
Height = 300
Index = 2
Left = 1050
TabIndex = 6
Top = 825
Width = 4530
_ExtentX = 7990
_ExtentY = 529
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
BorderStyle = 0
PreControl = "ftguest(1)"
NextControl = "ftguest(3)"
End
Begin 給出焦點文本框.FocusText ftGuest
Height = 300
Index = 3
Left = 4020
TabIndex = 7
Top = 135
Width = 1560
_ExtentX = 2752
_ExtentY = 529
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
BorderStyle = 0
End
Begin 給出焦點文本框.FocusText ftGuest
Height = 300
Index = 4
Left = 4020
TabIndex = 8
Top = 480
Width = 1560
_ExtentX = 2752
_ExtentY = 529
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
BorderStyle = 0
End
Begin VB.Line Line2
BorderColor = &H00FFFFFF&
Index = 1
X1 = 7965
X2 = 7965
Y1 = 15
Y2 = 1260
End
Begin VB.Line Line2
BorderColor = &H00808080&
Index = 0
X1 = 45
X2 = 45
Y1 = -15
Y2 = 1230
End
Begin VB.Line Line1
BorderColor = &H00FFFFFF&
Index = 1
X1 = 45
X2 = 7980
Y1 = 1230
Y2 = 1230
End
Begin VB.Line Line1
BorderColor = &H00808080&
Index = 0
X1 = 45
X2 = 7980
Y1 = 0
Y2 = 0
End
Begin VB.Label Label12
AutoSize = -1 'True
Caption = "身份證:"
BeginProperty Font
Name = "Arial"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 225
Index = 4
Left = 3330
TabIndex = 26
Top = 525
Width = 585
End
Begin VB.Label Label12
AutoSize = -1 'True
Caption = "電話:"
BeginProperty Font
Name = "Arial"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 225
Index = 3
Left = 3495
TabIndex = 25
Top = 180
Width = 405
End
Begin VB.Label Label12
AutoSize = -1 'True
Caption = "地址:"
BeginProperty Font
Name = "Arial"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 225
Index = 2
Left = 600
TabIndex = 24
Top = 870
Width = 405
End
Begin VB.Label Label12
AutoSize = -1 'True
Caption = "名稱:"
BeginProperty Font
Name = "Arial"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 225
Index = 1
Left = 600
TabIndex = 23
Top = 525
Width = 405
End
Begin VB.Label Label12
AutoSize = -1 'True
Caption = "編號:"
BeginProperty Font
Name = "Arial"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 225
Index = 0
Left = 600
TabIndex = 22
Top = 180
Width = 405
End
End
Begin VB.Frame Frame2
Caption = "提示："
BeginProperty Font
Name = "Arial"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 945
Left = 105
TabIndex = 16
Top = 5205
Width = 7980
Begin VB.CheckBox chkReserved
Caption = "保留當(dāng)前位置"
BeginProperty Font
Name = "Arial"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000040C0&
Height = 225
Left = -195
TabIndex = 20
Top = -180
Visible = 0 'False
Width = 1410
End
Begin VB.Label Label2
BackStyle = 0 'Transparent
Caption = "選定上面的產(chǎn)品之后按確定按鈕,〓為目錄,◇為產(chǎn)品。"
BeginProperty Font
Name = "Arial"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 450
Left = 5520
TabIndex = 19
Top = 330
Width = 2205
End
Begin VB.Shape Shape2
FillColor = &H0000C0C0&
FillStyle = 0 'Solid
Height = 300
Left = 5055
Shape = 3 'Circle
Top = 180
Width = 495
End
Begin VB.Shape Shape1
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 540
Left = 5235
Top = 270
Width = 2610
End
Begin VB.Label Label1
Caption = "2、如果為新的客戶或者產(chǎn)品時,請按新建按鈕建立。"
BeginProperty Font
Name = "Arial"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00404040&
Height = 270
Index = 1
Left = 300
TabIndex = 18
Top = 600
Width = 4425
End
Begin VB.Label Label1
Caption = "1、在文本框中輸入關(guān)鍵字,那么列表框中將自動搜索。"
BeginProperty Font
Name = "Arial"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00404040&
Height = 270
Index = 0
Left = 300
TabIndex = 17
Top = 330
Width = 4425
End
End
Begin VB.Frame Frame1
BorderStyle = 0 'None
Height = 405
Left = 105
TabIndex = 15
Top = 4320
Width = 8010
Begin VB.CommandButton cmdNew
Caption = "確定(&O)"
BeginProperty Font
Name = "Arial"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 5595
TabIndex = 2
Top = 30
Width = 1110
End
Begin VB.TextBox txtInput
BeginProperty Font
Name = "宋體"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 30
TabIndex = 1
Top = 45
Width = 5535
End
Begin VB.CommandButton cmdBack
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -