📄 frmempman.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "mscomctl.ocx"
Object = "{67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0"; "msadodc.ocx"
Object = "{F0D2F211-CCB0-11D0-A316-00AA00688B10}#1.0#0"; "MSDATLST.OCX"
Begin VB.Form FrmEmpMan
BorderStyle = 1 'Fixed Single
Caption = "员工管理"
ClientHeight = 9465
ClientLeft = 45
ClientTop = 330
ClientWidth = 15270
Icon = "FrmEmpMan.frx":0000
LinkTopic = "Form1"
MDIChild = -1 'True
ScaleHeight = 9465
ScaleWidth = 15270
Begin MSAdodcLib.Adodc AdoEmpNameList
Height = 330
Left = 10080
Top = 6960
Visible = 0 'False
Width = 3135
_ExtentX = 5530
_ExtentY = 582
ConnectMode = 0
CursorLocation = 3
IsolationLevel = -1
ConnectionTimeout= 15
CommandTimeout = 30
CursorType = 1
LockType = 3
CommandType = 8
CursorOptions = 0
CacheSize = 50
MaxRecords = 0
BOFAction = 0
EOFAction = 0
ConnectStringType= 3
Appearance = 1
BackColor = -2147483643
ForeColor = -2147483640
Orientation = 0
Enabled = -1
Connect = ""
OLEDBString = ""
OLEDBFile = ""
DataSourceName = ""
OtherAttributes = ""
UserName = ""
Password = ""
RecordSource = ""
Caption = "AdoEmpNameList"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
_Version = 393216
End
Begin MSAdodcLib.Adodc AdoEmpDetail
Height = 330
Left = 1920
Top = 8160
Visible = 0 'False
Width = 2775
_ExtentX = 4895
_ExtentY = 582
ConnectMode = 0
CursorLocation = 3
IsolationLevel = -1
ConnectionTimeout= 15
CommandTimeout = 30
CursorType = 1
LockType = 3
CommandType = 8
CursorOptions = 0
CacheSize = 50
MaxRecords = 0
BOFAction = 0
EOFAction = 0
ConnectStringType= 3
Appearance = 1
BackColor = -2147483643
ForeColor = -2147483640
Orientation = 0
Enabled = -1
Connect = ""
OLEDBString = ""
OLEDBFile = ""
DataSourceName = ""
OtherAttributes = ""
UserName = ""
Password = ""
RecordSource = ""
Caption = "AdoEmpDetail"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
_Version = 393216
End
Begin VB.ComboBox ComboState
Height = 315
ItemData = "FrmEmpMan.frx":0CCA
Left = 1800
List = "FrmEmpMan.frx":0CE0
Style = 2 'Dropdown List
TabIndex = 65
Top = 4320
Width = 2415
End
Begin VB.Frame Frame2
Height = 735
Left = 1800
TabIndex = 64
Top = 7200
Width = 11655
Begin VB.Label LblFamily
BackStyle = 0 'Transparent
Caption = "家庭主要成员管理"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 3840
MouseIcon = "FrmEmpMan.frx":0D20
MousePointer = 99 'Custom
TabIndex = 74
Top = 240
Width = 2055
End
Begin VB.Image Image8
Height = 300
Left = 3240
Picture = "FrmEmpMan.frx":102A
Top = 240
Width = 300
End
Begin VB.Label LblExperience
BackStyle = 0 'Transparent
Caption = "学历与工作经历管理"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 6960
MouseIcon = "FrmEmpMan.frx":1446
MousePointer = 99 'Custom
TabIndex = 73
Top = 240
Width = 2415
End
Begin VB.Image Image7
Height = 300
Left = 6360
Picture = "FrmEmpMan.frx":1750
Top = 240
Width = 300
End
End
Begin VB.Frame Frame1
ForeColor = &H00808000&
Height = 5775
Left = 4320
TabIndex = 0
Top = 1440
Width = 9135
Begin VB.Label Lbl_Upper
AutoSize = -1 'True
BackColor = &H00FFC0C0&
BackStyle = 0 'Transparent
Caption = "Upper"
DataField = "Memo"
DataSource = "AdoEmpDetail"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800080&
Height = 180
Left = 6000
TabIndex = 75
Top = 4320
Width = 450
End
Begin VB.Label Lbl_Memo
AutoSize = -1 'True
BackColor = &H00FFC0C0&
BackStyle = 0 'Transparent
Caption = "Memo"
DataField = "Memo"
DataSource = "AdoEmpDetail"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800080&
Height = 180
Left = 6000
TabIndex = 63
Top = 4800
Width = 360
End
Begin VB.Label Label27
AutoSize = -1 'True
BackColor = &H00FFC0C0&
BackStyle = 0 'Transparent
Caption = "备 注"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 4800
TabIndex = 62
Top = 4800
Width = 1050
End
Begin VB.Label Lbl_BadgeID
BackColor = &H00FFC0C0&
BackStyle = 0 'Transparent
Caption = "OfficePhone"
DataField = "BadgeID"
DataSource = "AdoEmpDetail"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800080&
Height = 225
Left = 6120
TabIndex = 61
Top = 1440
Width = 1440
End
Begin VB.Label Label3
AutoSize = -1 'True
BackColor = &H00FFC0C0&
BackStyle = 0 'Transparent
Caption = "工作证号"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 4800
TabIndex = 60
Top = 1440
Width = 1020
End
Begin VB.Label Lbl_Fillin_Time
AutoSize = -1 'True
BackColor = &H00FFC0C0&
BackStyle = 0 'Transparent
Caption = "Fillin_Time"
DataField = "Fillin_Time"
DataSource = "AdoEmpDetail"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800080&
Height = 180
Left = 3720
TabIndex = 59
Top = 5280
Width = 990
End
Begin VB.Label Label35
AutoSize = -1 'True
BackColor = &H00FFC0C0&
BackStyle = 0 'Transparent
Caption = "填表时间"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 2520
TabIndex = 58
Top = 5280
Width = 1020
End
Begin VB.Label Lbl_Fillin_Person
BackColor = &H00FFC0C0&
BackStyle = 0 'Transparent
Caption = "Fillin_Person"
DataField = "Fillin_Person"
DataSource = "AdoEmpDetail"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800080&
Height = 180
Left = 1320
TabIndex = 57
Top = 5280
Width = 930
End
Begin VB.Label Label32
AutoSize = -1 'True
BackColor = &H00FFC0C0&
BackStyle = 0 'Transparent
Caption = "填表人"
BeginProperty Font
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -