📄 frmclassify.frm
字号:
_ExtentX = 13944
_ExtentY = 6006
View = 3
LabelEdit = 1
LabelWrap = -1 'True
HideSelection = 0 'False
FullRowSelect = -1 'True
GridLines = -1 'True
_Version = 393217
ForeColor = -2147483640
BackColor = 12648384
BorderStyle = 1
Appearance = 1
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
NumItems = 7
BeginProperty ColumnHeader(1) {BDD1F052-858B-11D1-B16A-00C0F0283628}
Text = "编号"
Object.Width = 1588
EndProperty
BeginProperty ColumnHeader(2) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 1
Text = "名称"
Object.Width = 3951
EndProperty
BeginProperty ColumnHeader(3) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 2
Text = "性别"
Object.Width = 1129
EndProperty
BeginProperty ColumnHeader(4) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 3
Text = "年龄下限"
Object.Width = 1658
EndProperty
BeginProperty ColumnHeader(5) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 4
Text = "年龄上限"
Object.Width = 1658
EndProperty
BeginProperty ColumnHeader(6) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 5
Text = "婚姻状况"
Object.Width = 1834
EndProperty
BeginProperty ColumnHeader(7) {BDD1F052-858B-11D1-B16A-00C0F0283628}
SubItemIndex = 6
Text = "体检日期"
Object.Width = 4304
EndProperty
End
End
Begin VB.Frame Frame3
BackColor = &H00D3DABC&
Caption = "分组条件"
Height = 945
Left = -74805
TabIndex = 60
Top = 1935
Width = 8205
Begin VB.Frame Frame8
BackColor = &H00D3DABC&
Caption = "年龄"
Height = 615
Left = 5490
TabIndex = 69
Top = 270
Width = 2535
Begin VB.TextBox txtUAge
Height = 285
Left = 1830
TabIndex = 71
Top = 240
Width = 360
End
Begin VB.TextBox txtDAge
Height = 285
Left = 660
TabIndex = 70
Top = 240
Width = 360
End
Begin MSComCtl2.UpDown updDown
Height = 315
Left = 1020
TabIndex = 72
Top = 210
Width = 255
_ExtentX = 423
_ExtentY = 556
_Version = 393216
Value = 20
Max = 120
Wrap = -1 'True
Enabled = -1 'True
End
Begin MSComCtl2.UpDown updUp
Height = 315
Left = 2190
TabIndex = 73
Top = 210
Width = 255
_ExtentX = 423
_ExtentY = 556
_Version = 393216
Value = 30
Max = 120
Wrap = -1 'True
Enabled = -1 'True
End
Begin VB.Label Label7
BackColor = &H00D3DABC&
Caption = "下限"
Height = 225
Index = 0
Left = 180
TabIndex = 75
Top = 270
Width = 495
End
Begin VB.Label Label6
BackColor = &H00D3DABC&
Caption = "上限"
Height = 225
Index = 0
Left = 1410
TabIndex = 74
Top = 270
Width = 525
End
End
Begin VB.Frame Frame2
BackColor = &H00D3DABC&
Caption = "婚姻状况"
Height = 615
Index = 1
Left = 2715
TabIndex = 65
Top = 270
Width = 2385
Begin VB.OptionButton optMEither
BackColor = &H00D3DABC&
Caption = "不限"
Height = 225
Left = 1530
TabIndex = 68
Top = 300
Value = -1 'True
Width = 750
End
Begin VB.OptionButton optMYes
BackColor = &H00D3DABC&
Caption = "已婚"
Height = 225
Left = 810
TabIndex = 67
Top = 300
Width = 765
End
Begin VB.OptionButton optMNo
BackColor = &H00D3DABC&
Caption = "未婚"
Height = 255
Left = 90
TabIndex = 66
Top = 270
Width = 750
End
End
Begin VB.Frame Frame7
BackColor = &H00D3DABC&
Caption = "性别"
Height = 615
Left = 180
TabIndex = 61
Top = 270
Width = 2145
Begin VB.OptionButton optSMale
BackColor = &H00D3DABC&
Caption = "男"
Height = 345
Left = 90
TabIndex = 64
Top = 210
Value = -1 'True
Width = 525
End
Begin VB.OptionButton optSFemale
BackColor = &H00D3DABC&
Caption = "女"
Height = 345
Left = 660
TabIndex = 63
Top = 210
Width = 525
End
Begin VB.OptionButton optEither
BackColor = &H00D3DABC&
Caption = "不限"
Height = 255
Left = 1260
TabIndex = 62
Top = 270
Width = 765
End
End
End
Begin VB.Frame Frame2
BackColor = &H00D3DABC&
Caption = "分组信息"
Height = 1335
Index = 0
Left = -74805
TabIndex = 51
Top = 540
Width = 8205
Begin VB.TextBox txtDWMC
Appearance = 0 'Flat
BackColor = &H8000000F&
Enabled = 0 'False
Height = 285
Left = 1140
TabIndex = 54
Top = 300
Width = 6135
End
Begin VB.TextBox txtSN
Appearance = 0 'Flat
Enabled = 0 'False
Height = 285
Left = 1140
TabIndex = 53
Top = 1200
Visible = 0 'False
Width = 465
End
Begin VB.TextBox txtTeam
Enabled = 0 'False
Height = 285
Left = 1140
TabIndex = 52
Top = 810
Width = 3165
End
Begin MSComCtl2.DTPicker DtpFZTJRQ
Height = 315
Left = 5640
TabIndex = 55
Top = 780
Width = 1665
_ExtentX = 2937
_ExtentY = 556
_Version = 393216
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Format = 49741825
CurrentDate = 38076
MaxDate = 73415
MinDate = 2
End
Begin VB.Label Label5
BackStyle = 0 'Transparent
Caption = "体检日期："
Height = 255
Index = 0
Left = 4710
TabIndex = 59
Top = 840
Width = 915
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "单位名称："
Height = 315
Index = 1
Left = 150
TabIndex = 58
Top = 330
Width = 1065
End
Begin VB.Label Label2
BackStyle = 0 'Transparent
Caption = "分组编号："
Height = 270
Index = 0
Left = 120
TabIndex = 57
Top = 1245
Visible = 0 'False
Width = 1065
End
Begin VB.Label Label4
BackStyle = 0 'Transparent
Caption = "分组名称："
ForeColor = &H0000C000&
Height = 255
Index = 0
Left = 150
TabIndex = 56
Top = 840
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -