📄 dt_krdj.frm
字号:
Left = 7440
TabIndex = 123
Top = 3360
Width = 735
End
Begin VB.Label Label23
Caption = "接 待 员"
Height = 255
Left = 5040
TabIndex = 122
Top = 2880
Width = 855
End
Begin VB.Label Label22
Caption = "房 租"
Height = 255
Left = 5040
TabIndex = 121
Top = 2460
Width = 735
End
Begin VB.Label Label21
Caption = "住客类型"
Height = 255
Left = 240
TabIndex = 120
Top = 2490
Width = 735
End
Begin VB.Label Label17
Caption = "付款方式"
Height = 255
Left = 2640
TabIndex = 119
Top = 3300
Width = 735
End
Begin VB.Label Label16
Caption = "离店日期"
Height = 255
Left = 5040
TabIndex = 118
Top = 2040
Width = 735
End
Begin VB.Label Label15
Caption = " VIP"
Height = 255
Left = 240
TabIndex = 117
Top = 3330
Width = 735
End
Begin VB.Label Label14
Caption = "登记时间"
Height = 255
Left = 2640
TabIndex = 116
Top = 2070
Width = 735
End
Begin VB.Label Label13
Caption = "来店日期"
Height = 255
Left = 240
TabIndex = 115
Top = 2100
Width = 735
End
Begin VB.Label Label12
Caption = "来连事由"
Height = 255
Left = 7440
TabIndex = 114
Top = 1260
Width = 735
End
Begin VB.Label Label11
Caption = "中文姓名"
Height = 255
Left = 3720
TabIndex = 113
Top = 420
Width = 855
End
Begin VB.Label Label10
Caption = "外文姓名"
Height = 255
Left = 7440
TabIndex = 112
Top = 420
Width = 735
End
Begin VB.Label Label9
Caption = "性 别"
Height = 255
Left = 240
TabIndex = 111
Top = 840
Width = 735
End
Begin VB.Label Label8
Caption = "证件号码"
Height = 255
Left = 3720
TabIndex = 110
Top = 1260
Width = 855
End
Begin VB.Label Label7
Caption = "生 日"
Height = 255
Left = 3720
TabIndex = 109
Top = 840
Width = 855
End
Begin VB.Label Label6
Caption = "国 籍"
Height = 255
Left = 7440
TabIndex = 108
Top = 840
Width = 735
End
Begin VB.Label Label5
Caption = "证件种类"
Height = 255
Left = 240
TabIndex = 107
Top = 1260
Width = 735
End
Begin VB.Label Label4
Caption = "签证种类"
Height = 255
Left = 240
TabIndex = 106
Top = 1680
Width = 855
End
Begin VB.Label Label3
Caption = "有 效 期"
Height = 255
Left = 3720
TabIndex = 105
Top = 1680
Width = 855
End
Begin VB.Label Label1
Caption = "永久住址"
Height = 255
Left = 7440
TabIndex = 104
Top = 1680
Width = 855
End
Begin VB.Label Label2
BackStyle = 0 'Transparent
Caption = "帐 号"
Height = 255
Left = 240
TabIndex = 103
Top = 420
Width = 735
End
Begin VB.Label Label37
Caption = "定 金"
Height = 255
Left = 240
TabIndex = 102
Top = 3750
Width = 735
End
Begin VB.Label Label38
Caption = "总 消 费"
Height = 255
Left = 2640
TabIndex = 101
Top = 3720
Width = 735
End
Begin MSForms.ComboBox cm_gjmc
Height = 300
Left = 8700
TabIndex = 16
Top = 780
Width = 2175
VariousPropertyBits= 746604571
MaxLength = 20
DisplayStyle = 3
Size = "3836;529"
ColumnCount = 2
cColumnInfo = 2
MatchEntry = 1
ShowDropButtonWhen= 2
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
Object.Width = "705;1058"
End
Begin MSForms.TextBox m_kf_fz
Height = 300
Left = 5880
TabIndex = 33
Top = 2460
Width = 1215
VariousPropertyBits= 746604571
MaxLength = 9
Size = "2143;529"
Value = "123456.78"
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
ParagraphAlign = 2
End
Begin MSForms.TextBox m_kf_fwf
Height = 300
Left = 8280
TabIndex = 34
Top = 2460
Width = 1215
VariousPropertyBits= 746604571
MaxLength = 9
Size = "2143;529"
Value = "123456.78"
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
ParagraphAlign = 2
End
Begin MSForms.TextBox m_kr_dj
Height = 300
Left = 1080
TabIndex = 100
Top = 3720
Width = 1335
VariousPropertyBits= 746604571
MaxLength = 13
Size = "2355;529"
Value = "123456789.01"
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
ParagraphAlign = 2
End
Begin MSForms.TextBox m_zxfe
Height = 300
Left = 3480
TabIndex = 99
Top = 3720
Width = 1335
VariousPropertyBits= 746604571
MaxLength = 13
Size = "2355;529"
Value = "123456789.01"
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
ParagraphAlign = 2
End
Begin MSForms.ComboBox cm_symc
Height = 300
Left = 8700
TabIndex = 21
Top = 1200
Width = 2175
VariousPropertyBits= 746604571
MaxLength = 8
DisplayStyle = 3
Size = "3836;529"
ColumnCount = 2
cColumnInfo = 2
MatchEntry = 1
ShowDropButtonWhen= 2
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
Object.Width = "705;1058"
End
Begin MSForms.ComboBox cm_qzmc
Height = 300
Left = 1440
TabIndex = 23
Top = 1620
Width = 1995
VariousPropertyBits= 746604571
MaxLength = 8
DisplayStyle = 3
Size = "3519;529"
ColumnCount = 2
cColumnInfo = 2
MatchEntry = 1
ShowDropButtonWhen= 2
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
Object.Width = "705;1058"
End
Begin MSForms.ComboBox cm_zklx_mc
Height = 300
Left = 1440
TabIndex = 31
Top = 2460
Width = 1035
VariousPropertyBits= 746604571
MaxLength = 4
DisplayStyle = 3
Size = "1826;529"
ColumnCount = 2
cColumnInfo = 2
MatchEntry = 1
ShowDropButtonWhen= 2
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
Object.Width = "705;1058"
End
Begin MSForms.ComboBox cm_tdmc
Height = 300
Left = 1740
TabIndex = 36
Top = 2880
Width = 3075
VariousPropertyBits= 746604571
MaxLength = 16
DisplayStyle = 3
Size = "5424;529"
ColumnCount = 2
cColumnInfo = 2
MatchEntry = 1
ShowDropButtonWhen= 2
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
Object.Width = "705;1058"
End
Begin MSForms.TextBox m_kf_zkl
Height = 300
Left = 3480
TabIndex = 32
Top = 2460
Width = 585
VariousPropertyBits= 746604571
MaxLength = 3
Size = "1032;529"
Value = "100"
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
ParagraphAlign = 2
End
Begin VB.Label Label27
Caption = "%"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 195
Left = 4140
TabIndex = 98
Top = 2490
Width = 135
End
End
Begin VB.CommandButton cmd_djbt
Caption = "可卖房(F10)"
Height = 375
Index = 10
Left = 9060
TabIndex = 3
Top = 960
Width = 1125
End
Begin VB.CommandButton cmd_djbt
Caption = "保存(F2)"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -