📄 dt_tddj.frm
字号:
TabIndex = 124
Top = 390
Width = 840
End
Begin VB.Label Label56
AutoSize = -1 'True
Caption = "入住日期"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Left = 1230
TabIndex = 123
Top = 390
Width = 840
End
End
Begin VB.CommandButton Cmd_df
Caption = "确 认"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 555
Index = 0
Left = -69360
TabIndex = 50
Top = 6330
Width = 1575
End
Begin VB.CommandButton Cmd_df
Caption = "返 回"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 555
Index = 1
Left = -67590
TabIndex = 51
Top = 6330
Width = 1575
End
Begin VB.Frame fm_yb
Height = 6345
Left = 240
TabIndex = 83
Top = 630
Width = 9855
Begin VB.TextBox m_zck_bz
Height = 300
Left = 1500
MaxLength = 9
TabIndex = 30
Top = 4830
Width = 1215
End
Begin VB.TextBox m_jdy
Height = 300
Left = 7620
MaxLength = 3
TabIndex = 24
Top = 3750
Width = 1215
End
Begin VB.Frame Frame9
Height = 520
Left = 1515
TabIndex = 149
Top = 4140
Width = 1380
Begin VB.OptionButton op_mfzc_ft
Caption = "有"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 1
Left = 120
TabIndex = 25
Top = 120
Value = -1 'True
Width = 615
End
Begin VB.OptionButton op_mfzc_ft
Caption = "无"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 0
Left = 720
TabIndex = 26
Top = 120
Width = 615
End
End
Begin VB.TextBox m_yjbl
Height = 300
Left = 7620
MaxLength = 3
TabIndex = 29
Top = 4290
Width = 1215
End
Begin VB.TextBox m_kf_fwf
Height = 300
Left = 4560
MaxLength = 9
TabIndex = 23
Top = 3750
Width = 1215
End
Begin VB.TextBox m_kf_fz
Height = 300
Left = 1530
MaxLength = 9
TabIndex = 22
Top = 3750
Width = 1215
End
Begin VB.TextBox m_bdjddw_mc
Height = 300
Left = 7620
MaxLength = 3
TabIndex = 21
Top = 3270
Width = 1215
End
Begin VB.TextBox m_qdp_rs
Height = 300
Left = 4560
MaxLength = 3
TabIndex = 20
Top = 3270
Width = 1215
End
Begin VB.TextBox m_mf_fjs
Height = 300
Left = 1530
MaxLength = 3
TabIndex = 19
Top = 3270
Width = 1215
End
Begin VB.TextBox m_ye
Height = 300
Left = 7620
MaxLength = 12
TabIndex = 18
Top = 2790
Width = 1215
End
Begin VB.TextBox m_kr_dj
Height = 300
Left = 4560
MaxLength = 12
TabIndex = 17
Text = "123456789012"
Top = 2790
Width = 1215
End
Begin VB.TextBox m_zxfe
Height = 300
Left = 1530
MaxLength = 12
TabIndex = 16
Top = 2790
Width = 1215
End
Begin VB.TextBox m_jsr
Height = 300
Left = 4590
MaxLength = 3
TabIndex = 14
Top = 2310
Width = 1215
End
Begin VB.TextBox m_fkzh
Height = 300
Left = 4560
MaxLength = 5
TabIndex = 31
Top = 4830
Width = 1335
End
Begin VB.TextBox m_gjdm
Height = 300
Left = 5640
MaxLength = 2
TabIndex = 2
Text = "Text1"
Top = 360
Width = 495
End
Begin VB.ComboBox cm_tsfw
Height = 300
Left = 1500
TabIndex = 33
Text = "cm_tsfw"
Top = 5310
Width = 1725
End
Begin VB.TextBox m_dfy_dm
Height = 300
Left = 7620
MaxLength = 3
TabIndex = 15
Top = 2310
Width = 1215
End
Begin VB.TextBox m_ylbc
Height = 300
Left = 4560
MaxLength = 10
TabIndex = 11
Top = 1830
Width = 1455
End
Begin VB.TextBox m_ydbc
Height = 300
Left = 4560
MaxLength = 10
TabIndex = 8
Top = 1320
Width = 1455
End
Begin VB.TextBox m_df_js
Height = 300
Left = 7620
MaxLength = 3
TabIndex = 6
Top = 840
Width = 1215
End
Begin VB.TextBox m_rs
Height = 300
Left = 4560
MaxLength = 3
TabIndex = 5
Top = 870
Width = 1335
End
Begin VB.TextBox m_tdmc
Height = 300
Left = 1530
MaxLength = 20
TabIndex = 1
Text = "Text1"
Top = 360
Width = 2775
End
Begin VB.TextBox m_vip_mc
Height = 300
Left = 1530
MaxLength = 10
TabIndex = 4
Top = 840
Width = 1455
End
Begin VB.Frame Frame3
Height = 520
Left = 4560
TabIndex = 84
Top = 4140
Width = 1380
Begin VB.OptionButton op_yj_ft
Caption = "无"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 0
Left = 720
TabIndex = 28
Top = 120
Width = 615
End
Begin VB.OptionButton op_yj_ft
Caption = "有"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 1
Left = 120
TabIndex = 27
Top = 120
Value = -1 'True
Width = 615
End
End
Begin VB.TextBox m_bz
Height = 300
Left = 4590
MaxLength = 40
TabIndex = 34
Top = 5340
Width = 4815
End
Begin VB.CommandButton Cmd_yb
Caption = "确 认"
BeginProperty F
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -