📄 fortiej.frm
字号:
VERSION 5.00
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form Frmtiejia
BackColor = &H00C0C000&
Caption = "Form2"
ClientHeight = 4944
ClientLeft = 60
ClientTop = 348
ClientWidth = 8676
LinkTopic = "Form2"
ScaleHeight = 4944
ScaleWidth = 8676
StartUpPosition = 2 'CenterScreen
Begin VB.Data Data1
Caption = "Data1"
Connect = "Access"
DatabaseName = ""
DefaultCursorType= 0 'DefaultCursor
DefaultType = 2 'UseODBC
Exclusive = 0 'False
Height = 390
Left = -120
Options = 0
ReadOnly = 0 'False
RecordsetType = 1 'Dynaset
RecordSource = ""
Top = 4176
Visible = 0 'False
Width = 864
End
Begin VB.CommandButton cmdYes
BackColor = &H008080FF&
Caption = "保存"
BeginProperty Font
Name = "System"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 405
Left = 6405
TabIndex = 79
Top = 4410
Width = 885
End
Begin VB.CommandButton cmdExit
BackColor = &H008080FF&
Caption = "退出"
BeginProperty Font
Name = "System"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 405
Left = 7350
TabIndex = 78
Top = 4410
Width = 885
End
Begin VB.CommandButton Command1
Height = 435
Left = 2550
Picture = "Fortiej.frx":0000
Style = 1 'Graphical
TabIndex = 77
Top = 4380
Width = 645
End
Begin VB.CommandButton Command2
Height = 435
Left = 1230
Picture = "Fortiej.frx":015A
Style = 1 'Graphical
TabIndex = 76
Top = 4380
Width = 645
End
Begin VB.CommandButton Command3
Height = 435
Left = 1890
Picture = "Fortiej.frx":0284
Style = 1 'Graphical
TabIndex = 75
Top = 4380
Width = 645
End
Begin VB.CommandButton Command4
Height = 435
Left = 570
Picture = "Fortiej.frx":03E6
Style = 1 'Graphical
TabIndex = 74
Top = 4380
Width = 645
End
Begin VB.CommandButton Command5
BackColor = &H008080FF&
Caption = "添加"
BeginProperty Font
Name = "System"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 405
Left = 4530
TabIndex = 73
Top = 4410
Width = 885
End
Begin VB.CommandButton Command6
BackColor = &H008080FF&
Caption = "删除"
BeginProperty Font
Name = "System"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 405
Left = 5475
TabIndex = 72
Top = 4410
Width = 885
End
Begin VB.CommandButton Command7
BackColor = &H008080FF&
Caption = "修改"
BeginProperty Font
Name = "System"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 405
Left = 3570
TabIndex = 71
Top = 4410
Width = 885
End
Begin TabDlg.SSTab SSTab1
Height = 4176
Left = 96
TabIndex = 0
Top = 72
Width = 8352
_ExtentX = 14732
_ExtentY = 7366
_Version = 327680
Tabs = 6
Tab = 2
TabsPerRow = 6
TabHeight = 520
TabCaption(0) = "家庭基本情况"
TabPicture(0) = "Fortiej.frx":054C
Tab(0).ControlCount= 1
Tab(0).ControlEnabled= 0 'False
Tab(0).Control(0)= "Frame2"
Tab(0).Control(0).Enabled= 0 'False
TabCaption(1) = "个人基本信息"
TabPicture(1) = "Fortiej.frx":0568
Tab(1).ControlCount= 1
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "Frame1"
Tab(1).Control(0).Enabled= 0 'False
TabCaption(2) = "照片"
TabPicture(2) = "Fortiej.frx":0584
Tab(2).ControlCount= 1
Tab(2).ControlEnabled= -1 'True
Tab(2).Control(0)= "Frame3"
Tab(2).Control(0).Enabled= 0 'False
TabCaption(3) = "Tab 3"
Tab(3).ControlCount= 0
Tab(3).ControlEnabled= 0 'False
TabCaption(4) = "Tab 4"
TabPicture(4) = "Fortiej.frx":05A0
Tab(4).ControlCount= 0
Tab(4).ControlEnabled= 0 'False
TabCaption(5) = "Tab 5"
TabPicture(5) = "Fortiej.frx":05BC
Tab(5).ControlCount= 0
Tab(5).ControlEnabled= 0 'False
Begin VB.Frame Frame3
Height = 3405
Left = 230
TabIndex = 80
Top = 504
Width = 7845
Begin VB.ListBox List1
BackColor = &H00C0C0C0&
BeginProperty Font
Name = "宋体"
Size = 10.8
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 2856
Left = 456
TabIndex = 81
Top = 288
Width = 5076
End
Begin VB.Image Image1
Height = 2076
Left = 5808
Top = 312
Width = 1836
End
End
Begin VB.Frame Frame1
Height = 3405
Left = -74770
TabIndex = 22
Top = 504
Width = 7845
Begin VB.ComboBox cboMZ
BackColor = &H00C0C0FF&
DataField = "MZ"
DataSource = "Data1"
BeginProperty Font
Name = "宋体"
Size = 10.8
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 330
ItemData = "Fortiej.frx":05D8
Left = 1050
List = "Fortiej.frx":05DA
TabIndex = 42
Text = " "
Top = 720
Width = 1095
End
Begin VB.TextBox txtXH
BackColor = &H00C0C0FF&
DataField = "XH"
DataSource = "Data1"
BeginProperty Font
Name = "宋体"
Size = 10.8
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 330
Left = 1050
TabIndex = 41
Top = 270
Width = 1095
End
Begin VB.ComboBox cboYX
BackColor = &H00C0C0FF&
DataField = "YX"
DataSource = "Data1"
BeginProperty Font
Name = "宋体"
Size = 10.8
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 330
Left = 2700
TabIndex = 40
Text = " "
Top = 720
Width = 1095
End
Begin VB.TextBox txtXM
BackColor = &H00C0C0FF&
DataField = "XM"
DataSource = "Data1"
BeginProperty Font
Name = "宋体"
Size = 10.8
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 330
Left = 2700
TabIndex = 39
Top = 270
Width = 1095
End
Begin VB.TextBox MSKCSNY
BackColor = &H00C0C0FF&
DataField = "CSNY"
DataSource = "Data1"
BeginProperty Font
Name = "宋体"
Size = 10.8
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 330
Left = 4830
TabIndex = 38
Top = 270
Width = 1095
End
Begin VB.ComboBox cboHKSX
BackColor = &H00C0C0FF&
DataField = "HKSX"
DataSource = "Data1"
BeginProperty Font
Name = "宋体"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -