📄 dt_wgcgl.frm
字号:
Top = 4860
Width = 2595
End
Begin MSForms.Label Label21
Height = 315
Left = 1140
TabIndex = 59
Top = 1260
Width = 2655
Size = "4683;556"
SpecialEffect = 3
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
End
Begin MSForms.Label Label20
Height = 345
Left = 1170
TabIndex = 58
Top = 1260
Width = 2625
VariousPropertyBits= 8388627
PicturePosition = 6
Size = "4630;609"
MousePointer = 1
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
End
Begin VB.Label Label19
Alignment = 1 'Right Justify
BackStyle = 0 'Transparent
Caption = "已传输"
Height = 255
Left = 2070
TabIndex = 57
Top = 270
Width = 555
End
Begin VB.Label Label18
Caption = "永久地址"
Height = 255
Left = 330
TabIndex = 56
Top = 5310
Width = 735
End
Begin VB.Label Label17
Alignment = 1 'Right Justify
Caption = "离店日期"
Height = 255
Left = 2220
TabIndex = 55
Top = 4590
Width = 735
End
Begin VB.Label Label16
Caption = "来连事由"
Height = 255
Left = 300
TabIndex = 54
Top = 4200
Width = 735
End
Begin MSForms.ComboBox cm_symc
Height = 300
Left = 1500
TabIndex = 53
Top = 4140
Width = 2205
VariousPropertyBits= 746604571
MaxLength = 8
DisplayStyle = 3
Size = "3889;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 = 1500
TabIndex = 52
Top = 3090
Width = 2205
VariousPropertyBits= 746604571
MaxLength = 8
DisplayStyle = 3
Size = "3889;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_lsh
Height = 300
Left = 2820
TabIndex = 51
Top = 3780
Width = 855
VariousPropertyBits= 746604571
MaxLength = 7
Size = "1508;529"
Value = "1234567"
FontName = "宋体"
FontHeight = 180
FontCharSet = 134
FontPitchAndFamily= 34
ParagraphAlign = 2
End
Begin MSForms.ComboBox cm_gjmc
Height = 300
Left = 1500
TabIndex = 50
Top = 1980
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 VB.Label Label15
BackStyle = 0 'Transparent
Caption = "录入日期"
Height = 255
Left = 300
TabIndex = 49
Top = 240
Width = 735
End
Begin VB.Label Label14
Caption = "房 号"
Height = 255
Left = 300
TabIndex = 48
Top = 3840
Width = 735
End
Begin VB.Label Label13
Caption = "有 效 期"
Height = 255
Left = 300
TabIndex = 47
Top = 3480
Width = 735
End
Begin VB.Label Label12
Caption = "签证种类"
Height = 255
Left = 300
TabIndex = 46
Top = 3120
Width = 735
End
Begin VB.Label Label5
Caption = "证件种类"
Height = 255
Left = 300
TabIndex = 45
Top = 2400
Width = 735
End
Begin VB.Label Label6
Caption = "国 籍"
Height = 255
Left = 300
TabIndex = 44
Top = 2040
Width = 735
End
Begin VB.Label Label7
Caption = "生 日"
Height = 255
Left = 300
TabIndex = 43
Top = 1680
Width = 735
End
Begin VB.Label Label8
Caption = "证件号码"
Height = 255
Left = 300
TabIndex = 42
Top = 2760
Width = 735
End
Begin VB.Label Label9
Caption = "性 别"
Height = 255
Left = 300
TabIndex = 41
Top = 1320
Width = 735
End
Begin VB.Label Label10
Caption = "中文姓名"
Height = 255
Left = 300
TabIndex = 40
Top = 960
Width = 735
End
Begin VB.Label Label11
Caption = "外文姓名"
Height = 255
Left = 300
TabIndex = 39
Top = 600
Width = 735
End
Begin VB.Label Label22
Alignment = 1 'Right Justify
Caption = "序号"
Height = 255
Left = 2430
TabIndex = 38
Top = 3840
Width = 375
End
Begin VB.Label Label28
Caption = "备 注"
Height = 255
Left = 300
TabIndex = 37
Top = 4920
Width = 735
End
Begin VB.Label Label30
Alignment = 1 'Right Justify
Caption = "入住日期"
Height = 255
Left = 270
TabIndex = 36
Top = 4560
Width = 735
End
Begin MSForms.ComboBox cm_zjmc
Height = 300
Left = 1500
TabIndex = 35
Top = 2340
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
End
Begin MSFlexGridLib.MSFlexGrid gd1
Height = 6330
Left = 300
TabIndex = 60
Top = 540
Width = 7080
_ExtentX = 12488
_ExtentY = 11165
_Version = 327680
Rows = 10
Cols = 6
FixedCols = 0
BackColor = 12648447
FocusRect = 0
SelectionMode = 1
End
Begin VB.Label lb_xxxx
Alignment = 2 'Center
Caption = "详细信息"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 7560
TabIndex = 64
Top = 180
Width = 3675
End
Begin VB.Label lb_jls
Alignment = 1 'Right Justify
Caption = "0"
Height = 255
Left = 6600
TabIndex = 63
Top = 300
Width = 735
End
Begin VB.Label Label4
Alignment = 1 'Right Justify
Caption = "记录数 :"
Height = 255
Left = 5820
TabIndex = 62
Top = 300
Width = 795
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 = 61
Top = 180
Width = 5895
End
End
Begin VB.Timer XT_Timer
Interval = 1000
Left = 0
Top = 7200
End
Begin VB.Frame JZ
Enabled = 0 'False
Height = 600
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -