📄 frm_zhinfo.frm
字号:
VERSION 5.00
Begin VB.Form Frm_zhinfo
Caption = "住户信息登记 "
ClientHeight = 4200
ClientLeft = 60
ClientTop = 345
ClientWidth = 9225
LinkTopic = "Form1"
MaxButton = 0 'False
ScaleHeight = 4200
ScaleWidth = 9225
StartUpPosition = 1 '所有者中心
Begin VB.Frame Frame3
Height = 795
Left = 210
TabIndex = 25
Top = 3300
Width = 8775
Begin VB.CommandButton Command5
Caption = "退出业主信息"
Height = 450
Left = 7065
TabIndex = 30
Top = 240
Width = 1600
End
Begin VB.CommandButton CmdDeleteCY
Caption = "删除成员信息"
Height = 450
Left = 5355
TabIndex = 29
Top = 240
Width = 1600
End
Begin VB.CommandButton CmdEditCY
Caption = "编辑成员信息"
Height = 450
Left = 3675
TabIndex = 28
Top = 255
Width = 1600
End
Begin VB.CommandButton CmdNewCY
Caption = "添加成员信息"
Height = 450
Left = 1950
TabIndex = 27
Top = 255
Width = 1600
End
Begin VB.CommandButton CmdSaveYZ
Caption = "确定保存业主信息"
Height = 450
Left = 255
TabIndex = 26
Top = 240
Width = 1600
End
End
Begin VB.Frame Frame2
Caption = "住户信息"
Height = 2865
Left = 240
TabIndex = 0
Top = 360
Width = 8730
Begin VB.ComboBox Combo1
Height = 300
ItemData = "Frm_zhinfo.frx":0000
Left = 2880
List = "Frm_zhinfo.frx":000A
TabIndex = 35
Top = 240
Width = 915
End
Begin VB.TextBox Text2
Enabled = 0 'False
Height = 300
Left = 2760
TabIndex = 33
Top = 720
Width = 825
End
Begin VB.TextBox Text1
Height = 300
Left = 1080
TabIndex = 32
Top = 240
Width = 900
End
Begin VB.PictureBox DTPicker4
Height = 300
Left = 7275
ScaleHeight = 240
ScaleWidth = 1230
TabIndex = 24
Top = 2355
Width = 1290
End
Begin VB.PictureBox DTPicker3
Height = 300
Left = 7245
ScaleHeight = 240
ScaleWidth = 1260
TabIndex = 23
Top = 1995
Width = 1320
End
Begin VB.TextBox Text12
Height = 300
Left = 1005
TabIndex = 20
Top = 2340
Width = 2535
End
Begin VB.TextBox Text11
Height = 300
Left = 4605
TabIndex = 19
Top = 1110
Width = 3975
End
Begin VB.ComboBox Combo2
Height = 300
ItemData = "Frm_zhinfo.frx":0016
Left = 4680
List = "Frm_zhinfo.frx":0026
Style = 2 'Dropdown List
TabIndex = 18
Top = 240
Width = 1560
End
Begin VB.PictureBox DTPicker2
Height = 300
Left = 4695
ScaleHeight = 240
ScaleWidth = 1215
TabIndex = 17
Top = 2385
Width = 1275
End
Begin VB.PictureBox DTPicker1
Height = 300
Left = 4710
ScaleHeight = 240
ScaleWidth = 1200
TabIndex = 16
Top = 1935
Width = 1260
End
Begin VB.TextBox Text10
Height = 300
Left = 4665
TabIndex = 10
Top = 1500
Width = 2500
End
Begin VB.TextBox Text9
Height = 300
Left = 1080
TabIndex = 9
Top = 1935
Width = 2500
End
Begin VB.TextBox Text8
Height = 300
Left = 1080
TabIndex = 8
Top = 1500
Width = 2500
End
Begin VB.TextBox Text7
Height = 300
Left = 1065
TabIndex = 7
Top = 1095
Width = 2500
End
Begin VB.TextBox Text5
Enabled = 0 'False
Height = 300
Left = 1080
TabIndex = 6
Top = 720
Width = 825
End
Begin VB.Label Label11
AutoSize = -1 'True
Caption = "性 别："
Height = 180
Left = 2040
TabIndex = 36
Top = 300
Width = 810
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "国 籍："
Height = 180
Left = 2040
TabIndex = 34
Top = 840
Width = 720
End
Begin VB.Label Label2
AutoSize = -1 'True
Caption = "租客姓名："
Height = 180
Left = 195
TabIndex = 31
Top = 360
Width = 900
End
Begin VB.Label Label19
AutoSize = -1 'True
Caption = "进住截止日期："
Height = 180
Left = 6045
TabIndex = 22
Top = 2460
Width = 1260
End
Begin VB.Label Label18
AutoSize = -1 'True
Caption = "进住起始日期："
Height = 180
Left = 6015
TabIndex = 21
Top = 2025
Width = 1260
End
Begin VB.Label Label17
AutoSize = -1 'True
Caption = "进住日期："
Height = 180
Left = 3750
TabIndex = 15
Top = 2370
Width = 900
End
Begin VB.Label Label16
AutoSize = -1 'True
Caption = "签约时间："
Height = 180
Left = 3735
TabIndex = 14
Top = 1995
Width = 900
End
Begin VB.Label Label15
AutoSize = -1 'True
Caption = "工作单位："
Height = 180
Left = 105
TabIndex = 13
Top = 2400
Width = 900
End
Begin VB.Label Label14
AutoSize = -1 'True
Caption = "证件号码："
Height = 180
Left = 3735
TabIndex = 12
Top = 1155
Width = 900
End
Begin VB.Label Label12
AutoSize = -1 'True
Caption = "证件名称："
Height = 180
Left = 3840
TabIndex = 11
Top = 360
Width = 900
End
Begin VB.Label Label10
AutoSize = -1 'True
Caption = "公司电话："
Height = 180
Left = 3765
TabIndex = 5
Top = 1545
Width = 900
End
Begin VB.Label Label9
AutoSize = -1 'True
Caption = "联系地址："
Height = 180
Left = 195
TabIndex = 4
Top = 1965
Width = 900
End
Begin VB.Label Label8
AutoSize = -1 'True
Caption = "电 话："
Height = 180
Left = 195
TabIndex = 3
Top = 1575
Width = 720
End
Begin VB.Label Label7
AutoSize = -1 'True
Caption = "手 机："
Height = 180
Left = 210
TabIndex = 2
Top = 1140
Width = 720
End
Begin VB.Label Label5
AutoSize = -1 'True
Caption = "别墅编号："
Height = 180
Left = 240
TabIndex = 1
Top = 720
Width = 900
End
End
End
Attribute VB_Name = "Frm_zhinfo"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -