📄 frmsqlmark.frm
字号:
VERSION 5.00
Object = "{5E9E78A0-531B-11CF-91F6-C2863C385E30}#1.0#0"; "MSFLXGRD.OCX"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form FRMSQLMARK
BorderStyle = 3 'Fixed Dialog
Caption = "常用教务信息查询"
ClientHeight = 6825
ClientLeft = 45
ClientTop = 330
ClientWidth = 9510
Icon = "frmsqlmark.frx":0000
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 6825
ScaleWidth = 9510
ShowInTaskbar = 0 'False
StartUpPosition = 2 '屏幕中心
Begin TabDlg.SSTab SSTab1
Height = 3555
Left = 90
TabIndex = 8
Top = 30
Width = 7995
_ExtentX = 14102
_ExtentY = 6271
_Version = 393216
Tabs = 8
Tab = 3
TabsPerRow = 4
TabHeight = 520
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 11.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
TabCaption(0) = "班级成绩查询"
TabPicture(0) = "frmsqlmark.frx":0442
Tab(0).ControlEnabled= 0 'False
Tab(0).Control(0)= "Frame1(0)"
Tab(0).Control(0).Enabled= 0 'False
Tab(0).ControlCount= 1
TabCaption(1) = "个人成绩查询"
TabPicture(1) = "frmsqlmark.frx":045E
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "Frame1(2)"
Tab(1).Control(0).Enabled= 0 'False
Tab(1).ControlCount= 1
TabCaption(2) = "不及格信息查询"
TabPicture(2) = "frmsqlmark.frx":047A
Tab(2).ControlEnabled= 0 'False
Tab(2).Control(0)= "Frame1(4)"
Tab(2).Control(0).Enabled= 0 'False
Tab(2).ControlCount= 1
TabCaption(3) = "补考信息查询"
TabPicture(3) = "frmsqlmark.frx":0496
Tab(3).ControlEnabled= -1 'True
Tab(3).Control(0)= "Frame1(6)"
Tab(3).Control(0).Enabled= 0 'False
Tab(3).ControlCount= 1
TabCaption(4) = "选修课信息"
TabPicture(4) = "frmsqlmark.frx":04B2
Tab(4).ControlEnabled= 0 'False
Tab(4).Control(0)= "Frame1(7)"
Tab(4).Control(0).Enabled= 0 'False
Tab(4).ControlCount= 1
TabCaption(5) = "双学位信息"
TabPicture(5) = "frmsqlmark.frx":04CE
Tab(5).ControlEnabled= 0 'False
Tab(5).Control(0)= "Frame1(3)"
Tab(5).Control(0).Enabled= 0 'False
Tab(5).ControlCount= 1
TabCaption(6) = "重读生信息"
TabPicture(6) = "frmsqlmark.frx":04EA
Tab(6).ControlEnabled= 0 'False
Tab(6).Control(0)= "Frame1(5)"
Tab(6).Control(0).Enabled= 0 'False
Tab(6).ControlCount= 1
TabCaption(7) = "报警系统"
TabPicture(7) = "frmsqlmark.frx":0506
Tab(7).ControlEnabled= 0 'False
Tab(7).Control(0)= "Frame1(1)"
Tab(7).Control(0).Enabled= 0 'False
Tab(7).ControlCount= 1
Begin VB.Frame Frame1
Height = 2685
Index = 1
Left = -74850
TabIndex = 64
Top = 720
Width = 7515
Begin VB.ListBox LSTBJ
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 1950
Index = 4
Left = 1680
TabIndex = 100
Top = 615
Width = 1215
End
Begin VB.ListBox LSTYX
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 1950
Index = 4
Left = 270
TabIndex = 99
Top = 615
Width = 1215
End
Begin VB.Frame Frame8
Height = 2085
Left = 3090
TabIndex = 96
Top = 480
Width = 4245
Begin VB.TextBox Text10
Height = 270
Left = 3510
TabIndex = 109
Text = "2"
Top = 1680
Width = 465
End
Begin VB.OptionButton Option6
Caption = "重读生,其考试不及格科目门数>="
Height = 315
Left = 150
TabIndex = 108
Top = 1650
Width = 3255
End
Begin VB.OptionButton Option5
Caption = "选修双学位且本专业课目不及格数>="
Height = 285
Left = 150
TabIndex = 107
Top = 1305
Width = 3345
End
Begin VB.OptionButton Option4
Caption = "所有学期补考不及格课目门数>="
Height = 315
Left = 150
TabIndex = 106
Top = 945
Width = 2835
End
Begin VB.OptionButton Option3
Caption = "同一学期不及格课目门数 >="
Height = 255
Left = 150
TabIndex = 105
Top = 630
Width = 2595
End
Begin VB.OptionButton Option2
Caption = "所有学期不及格课目门数 >="
Height = 345
Left = 150
TabIndex = 104
Top = 240
Value = -1 'True
Width = 3015
End
Begin VB.TextBox Text9
Height = 270
Left = 3510
TabIndex = 103
Text = "2"
Top = 1329
Width = 465
End
Begin VB.TextBox Text8
Height = 270
Left = 3510
TabIndex = 102
Text = "4"
Top = 966
Width = 465
End
Begin VB.TextBox Text7
Height = 270
Left = 3510
TabIndex = 101
Text = "3"
Top = 603
Width = 465
End
Begin VB.TextBox Text6
Height = 270
Left = 3510
TabIndex = 98
Text = "6"
Top = 240
Width = 465
End
End
Begin VB.Label Label10
AutoSize = -1 'True
Caption = "报警类别:"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Index = 2
Left = 3090
TabIndex = 97
Top = 240
Width = 945
End
Begin VB.Label Label10
AutoSize = -1 'True
Caption = "班级:"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Index = 1
Left = 1680
TabIndex = 95
Top = 240
Width = 525
End
Begin VB.Label Label10
AutoSize = -1 'True
Caption = "院系:"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Index = 0
Left = 270
TabIndex = 94
Top = 240
Width = 525
End
End
Begin VB.Frame Frame1
Height = 2685
Index = 7
Left = -74820
TabIndex = 51
Top = 750
Width = 7515
Begin VB.ComboBox Combo3
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 990
TabIndex = 57
Text = "Combo3"
Top = 1980
Width = 2055
End
Begin VB.ComboBox Combo2
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 990
TabIndex = 56
Text = "Combo2"
Top = 1320
Width = 2055
End
Begin VB.ComboBox Combo1
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 990
TabIndex = 55
Text = "Combo1"
Top = 630
Width = 2055
End
Begin VB.ComboBox Combo4
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
ItemData = "frmsqlmark.frx":0522
Left = 4380
List = "frmsqlmark.frx":0544
TabIndex = 54
Text = "Combo4"
Top = 1320
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -