📄 dt_kfhf.frm
字号:
TabIndex = 25
Top = 6510
Width = 4965
Begin MSForms.TextBox tx_kf_fwf_x
Height = 285
Left = 3000
TabIndex = 29
Top = 300
Width = 1485
VariousPropertyBits= 746604571
MaxLength = 9
Size = "2619;503"
Value = "1234567.89"
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
ParagraphAlign = 2
End
Begin MSForms.TextBox tx_kf_fz_x
Height = 285
Left = 870
TabIndex = 28
Top = 300
Width = 1485
VariousPropertyBits= 746604571
MaxLength = 9
Size = "2619;503"
Value = "1234567.89"
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
ParagraphAlign = 2
End
Begin VB.Label Label10
Alignment = 1 'Right Justify
Caption = "房 租"
Height = 195
Left = 240
TabIndex = 27
Top = 330
Width = 555
End
Begin VB.Label Label11
Alignment = 1 'Right Justify
Caption = "服务费"
Height = 195
Left = 2400
TabIndex = 26
Top = 330
Width = 555
End
End
Begin VB.Frame fm_qb
Height = 435
Left = 2580
TabIndex = 22
Top = 750
Width = 1845
Begin VB.OptionButton op_qb
Caption = "本人"
Height = 180
Index = 0
Left = 180
TabIndex = 24
Top = 180
Value = -1 'True
Width = 705
End
Begin VB.OptionButton op_qb
Caption = "全体"
Height = 180
Index = 1
Left = 990
TabIndex = 23
Top = 180
Width = 705
End
End
Begin VB.Frame Frame2
Caption = "请选择要带走的帐目"
Height = 3495
Left = 120
TabIndex = 3
Top = 2910
Width = 10575
Begin VB.TextBox tx_zdh
Height = 300
Left = 3990
MaxLength = 15
TabIndex = 12
Text = "Text1"
Top = 210
Width = 2115
End
Begin VB.CommandButton cmd_sele
Caption = "<"
BeginProperty Font
Name = "黑体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 1
Left = 5100
TabIndex = 11
Top = 1800
Width = 375
End
Begin VB.CommandButton cmd_sele
Caption = ">"
BeginProperty Font
Name = "黑体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 0
Left = 5100
TabIndex = 10
Top = 780
Width = 375
End
Begin VB.CommandButton cmd_sele
Caption = ">>"
BeginProperty Font
Name = "黑体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 2
Left = 5100
TabIndex = 9
Top = 1290
Width = 375
End
Begin VB.CommandButton cmd_sele
Caption = "<<"
BeginProperty Font
Name = "黑体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 3
Left = 5100
TabIndex = 8
Top = 2310
Width = 375
End
Begin VB.TextBox tx_zh
Height = 300
Left = 1770
MaxLength = 5
TabIndex = 7
Text = "Text1"
Top = 3060
Width = 645
End
Begin VB.TextBox tx_pzh
Height = 300
Left = 6990
MaxLength = 15
TabIndex = 6
Text = "Text1"
Top = 3060
Width = 1275
End
Begin VB.CommandButton cmd_sele
Caption = "条件选择"
BeginProperty Font
Name = "黑体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 4
Left = 9000
TabIndex = 4
Top = 3030
Width = 1005
End
Begin MSMask.MaskEdBox tx_from
Height = 300
Left = 3630
TabIndex = 5
Top = 3060
Width = 1065
_ExtentX = 1879
_ExtentY = 529
_Version = 327680
MaxLength = 10
Mask = "####-##-##"
PromptChar = "_"
End
Begin MSMask.MaskEdBox tx_to
Height = 300
Left = 5010
TabIndex = 13
Top = 3060
Width = 1065
_ExtentX = 1879
_ExtentY = 529
_Version = 327680
MaxLength = 10
Mask = "####-##-##"
PromptChar = "_"
End
Begin MSFlexGridLib.MSFlexGrid gd_yzh
Height = 2160
Left = 60
TabIndex = 14
Top = 630
Width = 4920
_ExtentX = 8678
_ExtentY = 3810
_Version = 327680
Rows = 10
Cols = 6
FixedCols = 0
BackColor = 12648447
FocusRect = 0
SelectionMode = 1
End
Begin MSFlexGridLib.MSFlexGrid gd_xzh
Height = 2160
Left = 5580
TabIndex = 15
Top = 630
Width = 4920
_ExtentX = 8678
_ExtentY = 3810
_Version = 327680
Rows = 10
Cols = 6
FixedCols = 0
BackColor = 12648447
FocusRect = 0
SelectionMode = 1
End
Begin VB.Label Label12
Alignment = 1 'Right Justify
Caption = "换房帐单号"
Height = 195
Left = 2970
TabIndex = 21
Top = 270
Width = 915
End
Begin VB.Label Label13
Caption = "选择条件"
Height = 195
Left = 240
TabIndex = 20
Top = 3120
Width = 735
End
Begin VB.Label Label14
Caption = "帐号"
Height = 165
Left = 1380
TabIndex = 19
Top = 3120
Width = 435
End
Begin VB.Label Label15
Caption = "时间段 由"
Height = 165
Left = 2700
TabIndex = 18
Top = 3120
Width = 915
End
Begin VB.Label Label20
Caption = "至"
Height = 165
Left = 4770
TabIndex = 17
Top = 3120
Width = 195
End
Begin VB.Label Label21
Caption = "凭证号"
Height = 165
Left = 6420
TabIndex = 16
Top = 3120
Width = 555
End
End
Begin VB.Label Label2
Alignment = 2 'Center
Caption = "客房换房管理"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 300
TabIndex = 64
Top = 240
Width = 9375
End
Begin VB.Label Label4
Alignment = 1 'Right Justify
Caption = "原房号"
Height = 165
Left = 480
TabIndex = 63
Top = 930
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -