【VB开源代码栏目提醒】：网学会员鉴于大家对VB开源代码十分关注，论文会员在此为大家搜集整理了“frmCheckAlter.frm”一文，供大家参考学习
VERSION 5.00
Begin VB.Form frmCheckAlter
Caption = "
查询调动信息"
ClientHeight = 7620
ClientLeft = 60
ClientTop = 345
ClientWidth = 8595
ControlBox = 0 'False
LinkTopic = "Form1"
ScaleHeight = 7620
ScaleWidth = 8595
StartUpPosition = 2 '屏幕中心
Begin VB.ComboBox StuffID
Height = 300
Left = 2640
TabIndex = 15
Top = 840
Width = 2655
End
Begin VB.CheckBox IDchecked
Caption = "学生编号"
BeginProperty Font
Name = "楷体_GB2312"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 840
TabIndex = 14
Top = 720
Value = 1 'Checked
Width = 1575
End
Begin VB.Frame Frame1
Caption = "调出时间"
Height = 1815
Left = 480
TabIndex = 3
Top = 1920
Width = 5055
Begin VB.ComboBox fromYear
BeginProperty Font
Name = "楷体_GB2312"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 360
Left = 840
TabIndex = 7
Top = 360
Width = 1215
End
Begin VB.ComboBox FromMonth
BeginProperty Font
Name = "楷体_GB2312"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 360
Left = 2880
TabIndex = 6
Top = 360
Width = 1215
End
Begin VB.ComboBox toYear
BeginProperty Font
Name = "楷体_GB2312"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 360
Left = 840
TabIndex = 5
Top = 1080
Width = 1215
End
Begin
VB.ComboBox toMonth
BeginProperty Font
Name = "楷体_GB2312"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 360
Left = 2880
TabIndex = 4
Top = 1080
Width = 1215
End
Begin VB.Label Label1
Caption = "从"
BeginProperty Font
Name = "楷体_GB2312"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 360
TabIndex = 13
Top = 480
Width = 375
End
Begin VB.Label Label2
Caption = "年"
BeginProperty Font
Name = "楷体_GB2312"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 2280
TabIndex = 12
Top = 480
Width = 375
End
Begin VB.Label Label3
Caption = "月"
BeginProperty Font
Name = "楷体_GB2312"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 4320
TabIndex = 11
Top = 480
Width = 495
End
Begin VB.Label Label4
Caption = "到"
BeginProperty Font
Name = "楷体_GB2312"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 360
TabIndex = 10
Top = 1080
Width = 375
End
Begin VB.Label Label5
Caption = "年"
BeginProperty Font
Name = "楷体_GB2312"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 2280
TabIndex = 9
Top = 1080
Width = 375
End
Begin VB.Label Label6
Caption = "月"
BeginProperty Font
Name = "楷体_GB2312"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 4320
TabIndex = 8
Top = 1080
Width = 495
End
End
Begin VB.CommandButton cmdOK
Caption = "确定"
Default = -1 'True
BeginProperty Font
Name = "楷体_GB2312"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 615
Left = 960
TabIndex = 2
Top = 3960
Width = 1575
End
Begin VB.CommandButton cmdCancel
Caption = "取消"
BeginProperty Font
Name = "楷体_GB2312"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 615
Left = 3720
TabIndex = 1
Top = 3960
Width = 1575
End
Begin VB.CheckBox Timechecked
Caption = "时间"
BeginProperty Font
Name = "楷体_GB2312"
Size = 12
Charset
相关文章
2013-9-1
