📄 dt_krdj.frm
字号:
Width = 1035
End
Begin VB.TextBox m_zk_sqr
Height = 300
Left = 960
MaxLength = 10
TabIndex = 57
Text = "1234567890"
Top = 300
Width = 1035
End
Begin VB.Label Label39
Caption = "审 批 人"
Height = 255
Index = 0
Left = 120
TabIndex = 89
Top = 720
Width = 735
End
Begin VB.Label Label32
Caption = "申 请 人"
Height = 255
Index = 0
Left = 120
TabIndex = 88
Top = 360
Width = 735
End
End
Begin VB.Frame fm_tsxx
Caption = "托收信息"
Height = 1095
Left = 240
TabIndex = 84
Top = 5460
Width = 2175
Begin VB.TextBox m_tszh
Height = 300
Left = 960
MaxLength = 5
TabIndex = 56
Text = "12345"
Top = 660
Width = 615
End
Begin VB.Label Label39
Caption = "托收帐号"
Height = 255
Index = 2
Left = 120
TabIndex = 86
Top = 720
Width = 735
End
Begin VB.Label Label32
Caption = "托收底价"
Height = 255
Index = 2
Left = 120
TabIndex = 85
Top = 360
Width = 735
End
Begin MSForms.TextBox m_tsfz
Height = 300
Left = 960
TabIndex = 55
Top = 300
Width = 1035
VariousPropertyBits= 746604571
MaxLength = 9
Size = "1826;529"
Value = "123456.78"
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
ParagraphAlign = 2
End
End
Begin VB.Frame fm_fzxg
Caption = "修改房租"
Height = 1095
Left = 4980
TabIndex = 81
Top = 5460
Width = 2115
Begin VB.TextBox m_fzxg_spr
Height = 300
Left = 960
MaxLength = 10
TabIndex = 60
Text = "1234567890"
Top = 660
Width = 1035
End
Begin MSMask.MaskEdBox m_fzxg_rq
Height = 300
Left = 960
TabIndex = 59
Top = 300
Width = 1035
_ExtentX = 1826
_ExtentY = 529
_Version = 327680
MaxLength = 10
Mask = "####-##-##"
PromptChar = "_"
End
Begin VB.Label Label39
Caption = "审 批 人"
Height = 255
Index = 3
Left = 120
TabIndex = 83
Top = 720
Width = 735
End
Begin VB.Label Label32
Caption = "日 期"
Height = 255
Index = 3
Left = 120
TabIndex = 82
Top = 360
Width = 735
End
End
Begin VB.TextBox m_zjdm
Height = 300
Left = 1080
MaxLength = 2
TabIndex = 17
Text = "12"
Top = 1200
Width = 315
End
Begin VB.TextBox m_sydm
Height = 300
Left = 8280
MaxLength = 2
TabIndex = 20
Text = "12"
Top = 1200
Width = 380
End
Begin VB.TextBox m_qzdm
Height = 300
Left = 1080
MaxLength = 1
TabIndex = 22
Text = "12"
Top = 1620
Width = 315
End
Begin VB.ComboBox cm_dj_fkmc
Height = 300
Left = 3480
TabIndex = 40
Top = 3300
Width = 1335
End
Begin VB.ComboBox cm_tsfw
Height = 300
Left = 8280
TabIndex = 42
Text = "cm_tsfw"
Top = 3300
Width = 2235
End
Begin VB.TextBox m_kf_lxn
Height = 315
Left = 2430
TabIndex = 80
Text = "kf_lxn"
Top = 180
Visible = 0 'False
Width = 915
End
Begin VB.TextBox tx_kf_lxc
Enabled = 0 'False
Height = 300
Left = 1920
TabIndex = 79
Text = "Text1"
Top = 360
Width = 1215
End
Begin VB.TextBox m_yzh
Height = 270
Left = 330
TabIndex = 78
Text = "Text1"
Top = 150
Visible = 0 'False
Width = 765
End
Begin VB.Frame Frame2
Height = 435
Left = 1050
TabIndex = 77
Top = 690
Width = 2385
Begin VB.OptionButton op_xb
Caption = "未知"
Height = 210
Index = 0
Left = 1590
TabIndex = 13
Top = 180
Width = 675
End
Begin VB.OptionButton op_xb
Caption = "男"
Height = 210
Index = 1
Left = 180
TabIndex = 11
Top = 180
Value = -1 'True
Width = 465
End
Begin VB.OptionButton op_xb
Caption = "女"
Height = 210
Index = 2
Left = 930
TabIndex = 12
Top = 180
Width = 465
End
End
Begin MSMask.MaskEdBox m_ldsj
Height = 300
Left = 8280
TabIndex = 29
Top = 2040
Width = 1185
_ExtentX = 2090
_ExtentY = 529
_Version = 327680
MaxLength = 8
Mask = "##:##:##"
PromptChar = "_"
End
Begin MSMask.MaskEdBox m_kr_qz_yxq
Height = 300
Left = 4560
TabIndex = 24
Top = 1620
Width = 1095
_ExtentX = 1931
_ExtentY = 529
_Version = 327680
MaxLength = 10
Mask = "####-##-##"
PromptChar = "_"
End
Begin MSMask.MaskEdBox m_kr_sr
Height = 300
Left = 4560
TabIndex = 14
Top = 780
Width = 1095
_ExtentX = 1931
_ExtentY = 529
_Version = 327680
MaxLength = 10
Mask = "####-##-##"
PromptChar = "_"
End
Begin MSMask.MaskEdBox m_ldrq
Height = 300
Left = 5880
TabIndex = 28
Top = 2040
Width = 1215
_ExtentX = 2143
_ExtentY = 529
_Version = 327680
MaxLength = 10
Mask = "####-##-##"
PromptChar = "_"
End
Begin MSMask.MaskEdBox m_rzrq
Height = 300
Left = 1080
TabIndex = 26
Top = 2040
Width = 1095
_ExtentX = 1931
_ExtentY = 529
_Version = 327680
Enabled = 0 'False
MaxLength = 10
Mask = "####-##-##"
PromptChar = "_"
End
Begin MSMask.MaskEdBox m_rzsj
Height = 300
Left = 3480
TabIndex = 27
Top = 2040
Width = 1095
_ExtentX = 1931
_ExtentY = 529
_Version = 327680
MaxLength = 8
Mask = "##:##:##"
PromptChar = "_"
End
Begin MSForms.ComboBox cm_zjmc
Height = 300
Left = 1440
TabIndex = 18
Top = 1230
Width = 1995
VariousPropertyBits= 746604571
MaxLength = 20
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 VB.Label Label33
Caption = "操 作 员"
Height = 255
Left = 5040
TabIndex = 130
Top = 3300
Width = 735
End
Begin VB.Label Label31
Caption = "接待单位"
Height = 255
Left = 7440
TabIndex = 129
Top = 2940
Width = 855
End
Begin VB.Label Label30
Caption = "折 扣 率"
Height = 255
Left = 2640
TabIndex = 128
Top = 2490
Width = 735
End
Begin VB.Label Label29
Caption = "离店时间"
Height = 255
Left = 7440
TabIndex = 127
Top = 2100
Width = 735
End
Begin VB.Label Label28
Caption = "备 注"
Height = 255
Left = 5040
TabIndex = 126
Top = 3720
Width = 735
End
Begin VB.Label Label26
Caption = "团 队 号"
Height = 255
Left = 240
TabIndex = 125
Top = 2910
Width = 735
End
Begin VB.Label Label25
Caption = "服 务 费"
Height = 255
Left = 7440
TabIndex = 124
Top = 2550
Width = 735
End
Begin VB.Label Label24
Caption = "特殊服务"
Height = 255
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -