📄 form1.frm
字号:
VERSION 5.00
Object = "{CFA7AFF4-3242-4269-9172-7389D695AE01}#1.0#0"; "StoneXP.ocx"
Object = "{D959C709-8613-11D1-9840-002078110E7D}#1.0#0"; "as97Popup.ocx"
Object = "{DAAC6951-59A4-4C08-9D6E-FE3919B64861}#1.0#0"; "FlexCell.ocx"
Begin VB.Form form1
BackColor = &H00FFC0C0&
BorderStyle = 1 'Fixed Single
Caption = "学生学籍管理系统"
ClientHeight = 8910
ClientLeft = 45
ClientTop = 315
ClientWidth = 12000
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Icon = "Form1.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
Picture = "Form1.frx":F84A
ScaleHeight = 8910
ScaleWidth = 12000
StartUpPosition = 1 '所有者中心
Begin VB.Frame Fre1
BackColor = &H00C0C0FF&
BorderStyle = 0 'None
Height = 6165
Left = 150
TabIndex = 5
Top = 2480
Width = 1575
Begin VB.Frame Fre2
BackColor = &H00808080&
BorderStyle = 0 'None
Height = 375
Index = 0
Left = 0
TabIndex = 10
Top = 1920
Width = 1575
Begin as97Popup.asPopup asPopup1
Height = 855
Left = 240
ToolTipText = "添加销售记录"
Top = 240
Width = 1095
_ExtentX = 1931
_ExtentY = 1508
CustomPicture = "Form1.frx":200A8
Caption = "所有学生"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = 12582912
BevelWidth = 0
Layout = 3
MouseOverColor = 16777215
ScaleWidth = 73
ScaleMode = 0
ScaleHeight = 57
BackStyle = 0
Object.ToolTipText = "添加销售记录"
End
Begin as97Popup.asPopup asPopup2
Height = 855
Left = 240
ToolTipText = "查看销售记录"
Top = 1320
Width = 1095
_ExtentX = 1931
_ExtentY = 1508
CustomPicture = "Form1.frx":24C0D
MouseOverPicture= "Form1.frx":2995A
Caption = "增加学生"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = 12582912
BevelWidth = 0
Layout = 3
MouseOverColor = 16777215
ScaleWidth = 73
ScaleMode = 0
ScaleHeight = 57
BackStyle = 0
Object.ToolTipText = "查看销售记录"
End
End
Begin VB.Frame Fre2
BackColor = &H00808080&
BorderStyle = 0 'None
Height = 375
Index = 1
Left = 0
TabIndex = 9
Top = 2400
Width = 1575
Begin as97Popup.asPopup asPopup4
Height = 855
Left = 240
ToolTipText = "查看销售记录"
Top = 240
Width = 1095
_ExtentX = 1931
_ExtentY = 1508
CustomPicture = "Form1.frx":2E45A
MouseOverPicture= "Form1.frx":32F0A
Caption = "课程管理"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = 12582912
BevelWidth = 0
Layout = 3
MouseOverColor = 16777215
ScaleWidth = 73
ScaleMode = 0
ScaleHeight = 57
BackStyle = 0
Object.ToolTipText = "查看销售记录"
End
Begin as97Popup.asPopup asPopup7
Height = 855
Left = 240
ToolTipText = "查看销售记录"
Top = 1320
Width = 1095
_ExtentX = 1931
_ExtentY = 1508
CustomPicture = "Form1.frx":37CEF
MouseOverPicture= "Form1.frx":3CBCC
Caption = "所有成绩"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = 12582912
BevelWidth = 0
Layout = 3
MouseOverColor = 16777215
ScaleWidth = 73
ScaleMode = 0
ScaleHeight = 57
BackStyle = 0
Object.ToolTipText = "查看销售记录"
End
Begin as97Popup.asPopup asPopup6
Height = 855
Left = 240
ToolTipText = "查看销售记录"
Top = 2400
Width = 1095
_ExtentX = 1931
_ExtentY = 1508
CustomPicture = "Form1.frx":41687
MouseOverPicture= "Form1.frx":46637
Caption = "输入成绩"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = 12582912
BevelWidth = 0
Layout = 3
MouseOverColor = 16777215
ScaleWidth = 73
ScaleMode = 0
ScaleHeight = 57
BackStyle = 0
Object.ToolTipText = "查看销售记录"
End
End
Begin VB.Frame Fre2
BackColor = &H00808080&
BorderStyle = 0 'None
Height = 375
Index = 3
Left = 0
TabIndex = 8
Top = 4920
Width = 1575
Begin as97Popup.asPopup asPopup3
Height = 855
Left = 240
ToolTipText = "查看销售记录"
Top = 240
Width = 1095
_ExtentX = 1931
_ExtentY = 1508
CustomPicture = "Form1.frx":4B10B
Caption = "用户管理"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = 12582912
BevelWidth = 0
Layout = 3
MouseOverColor = 16777215
ScaleWidth = 73
ScaleMode = 0
ScaleHeight = 57
BackStyle = 0
Object.ToolTipText = "查看销售记录"
End
Begin as97Popup.asPopup asPopup10
Height = 855
Left = 240
ToolTipText = "查看销售记录"
Top = 1320
Width = 1095
_ExtentX = 1931
_ExtentY = 1508
CustomPicture = "Form1.frx":4FCFE
Caption = "班级管理"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = 12582912
BevelWidth = 0
Layout = 3
MouseOverColor = 16777215
ScaleWidth = 73
ScaleMode = 0
ScaleHeight = 57
BackStyle = 0
Object.ToolTipText = "查看销售记录"
End
End
Begin VB.Frame Fre2
BackColor = &H00808080&
BorderStyle = 0 'None
Height = 375
Index = 4
Left = 0
TabIndex = 7
Top = 5640
Width = 1575
Begin as97Popup.asPopup asPopup9
Height = 855
Left = 240
ToolTipText = "查看销售记录"
Top = 240
Width = 1095
_ExtentX = 1931
_ExtentY = 1508
CustomPicture = "Form1.frx":545C6
Caption = "退出系统"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = 12582912
BevelWidth = 0
Layout = 3
MouseOverColor = 16777215
ScaleWidth = 73
ScaleMode = 0
ScaleHeight = 57
BackStyle = 0
Object.ToolTipText = "查看销售记录"
End
End
Begin VB.Frame Fre2
BackColor = &H00808080&
BorderStyle = 0 'None
Height = 375
Index = 2
Left = 0
TabIndex = 6
Top = 2880
Width = 1575
Begin as97Popup.asPopup asPopup5
Height = 855
Left = 240
ToolTipText = "添加销售记录"
Top = 240
Width = 1095
_ExtentX = 1931
_ExtentY = 1508
CustomPicture = "Form1.frx":59259
MouseOverPicture= "Form1.frx":5DC91
Caption = "查询"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = 12582912
BevelWidth = 0
Layout = 3
MouseOverColor = 16777215
ScaleWidth = 73
ScaleMode = 0
ScaleHeight = 57
BackStyle = 0
Object.ToolTipText = "添加销售记录"
End
Begin as97Popup.asPopup asPopup8
Height = 855
Left = 240
ToolTipText = "添加销售记录"
Top = 1320
Width = 1095
_ExtentX = 1931
_ExtentY = 1508
CustomPicture = "Form1.frx":627B8
Caption = "成绩统计"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = 12582912
BevelWidth = 0
Layout = 3
MouseOverColor = 16777215
ScaleWidth = 73
ScaleMode = 0
ScaleHeight = 57
BackStyle = 0
Object.ToolTipText = "添加销售记录"
End
End
Begin StoneXP.XPButton c1
Height = 375
Index = 1
Left = 0
TabIndex = 11
Top = 360
Width = 1575
_ExtentX = 2778
_ExtentY = 661
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ButtonStyle = 1
Caption = "课程与成绩"
MouseIcon = "Form1.frx":67441
MousePointer = 99
End
Begin StoneXP.XPButton c1
Height = 375
Index = 2
Left = 0
TabIndex = 12
Top = 720
Width = 1575
_ExtentX = 2778
_ExtentY = 661
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ButtonStyle = 1
Caption = "查询与统计"
MouseIcon = "Form1.frx":6775B
MousePointer = 99
End
Begin StoneXP.XPButton c1
Height = 375
Index = 3
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -