📄 frmmain3.frm
字号:
VERSION 5.00
Object = "{22EFD1C8-C18B-11D0-A6AC-444553540000}#1.0#0"; "DRVFACTS.OCX"
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "COMDLG32.OCX"
Object = "{6B7E6392-850A-101B-AFC0-4210102A8DA7}#1.2#0"; "COMCTL32.OCX"
Object = "{6306CD75-86C3-11D2-99A7-444553540000}#3.0#0"; "FLATBAR.OCX"
Begin VB.Form Frmstart
BackColor = &H00404040&
Caption = "上海交通大学学生信息管理系统"
ClientHeight = 6510
ClientLeft = 60
ClientTop = 630
ClientWidth = 9480
Icon = "Frmmain3.frx":0000
LinkTopic = "Form1"
Picture = "Frmmain3.frx":030A
ScaleHeight = 6510
ScaleWidth = 9480
StartUpPosition = 2 'CenterScreen
WindowState = 2 'Maximized
Begin ComctlLib.Toolbar Toolbar1
Align = 1 'Align Top
Height = 615
Left = 0
TabIndex = 1
Top = 0
Width = 9480
_ExtentX = 16722
_ExtentY = 1085
ButtonWidth = 1455
ButtonHeight = 926
Appearance = 1
ImageList = "ImageList1"
_Version = 327682
BeginProperty Buttons {0713E452-850A-101B-AFC0-4210102A8DA7}
NumButtons = 9
BeginProperty Button1 {0713F354-850A-101B-AFC0-4210102A8DA7}
Caption = "退出系统"
Object.Tag = ""
ImageIndex = 1
EndProperty
BeginProperty Button2 {0713F354-850A-101B-AFC0-4210102A8DA7}
Object.Tag = ""
Style = 3
MixedState = -1 'True
EndProperty
BeginProperty Button3 {0713F354-850A-101B-AFC0-4210102A8DA7}
Caption = "记录添加"
Object.Tag = ""
ImageIndex = 3
EndProperty
BeginProperty Button4 {0713F354-850A-101B-AFC0-4210102A8DA7}
Caption = "记录修改"
Object.Tag = ""
ImageIndex = 6
EndProperty
BeginProperty Button5 {0713F354-850A-101B-AFC0-4210102A8DA7}
Caption = "资讯查询"
Object.Tag = ""
ImageIndex = 7
EndProperty
BeginProperty Button6 {0713F354-850A-101B-AFC0-4210102A8DA7}
Caption = "信息统计"
Object.Tag = ""
ImageIndex = 11
EndProperty
BeginProperty Button7 {0713F354-850A-101B-AFC0-4210102A8DA7}
Object.Tag = ""
Style = 3
MixedState = -1 'True
EndProperty
BeginProperty Button8 {0713F354-850A-101B-AFC0-4210102A8DA7}
Caption = "成绩管理"
Object.Tag = ""
ImageIndex = 5
EndProperty
BeginProperty Button9 {0713F354-850A-101B-AFC0-4210102A8DA7}
Caption = "成绩查询"
Object.Tag = ""
ImageIndex = 13
EndProperty
EndProperty
Begin FlatToolBar.FlatBar FlatBar1
Height = 615
Left = 6270
TabIndex = 2
Top = 150
Visible = 0 'False
Width = 615
_ExtentX = 1085
_ExtentY = 1085
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
End
Begin ComctlLib.StatusBar StatusBar1
Align = 2 'Align Bottom
Height = 345
Left = 0
TabIndex = 0
Top = 6165
Width = 9480
_ExtentX = 16722
_ExtentY = 609
SimpleText = ""
_Version = 327682
BeginProperty Panels {0713E89E-850A-101B-AFC0-4210102A8DA7}
NumPanels = 3
BeginProperty Panel1 {0713E89F-850A-101B-AFC0-4210102A8DA7}
Style = 6
Alignment = 1
AutoSize = 2
TextSave = "1995-01-14"
Object.Tag = ""
EndProperty
BeginProperty Panel2 {0713E89F-850A-101B-AFC0-4210102A8DA7}
Style = 5
Alignment = 1
AutoSize = 2
TextSave = "18:07"
Object.Tag = ""
EndProperty
BeginProperty Panel3 {0713E89F-850A-101B-AFC0-4210102A8DA7}
AutoSize = 1
Object.Width = 11033
Text = "上海交通大学益友软件开发部开发，1999年8月"
TextSave = "上海交通大学益友软件开发部开发，1999年8月"
Object.Tag = ""
EndProperty
EndProperty
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
End
Begin MSComDlg.CommonDialog CDlog1
Left = 3270
Top = 2910
_ExtentX = 847
_ExtentY = 847
_Version = 393216
End
Begin DrvFacts.DrvFact DrvFact1
Left = 2070
Top = 3240
_ExtentX = 847
_ExtentY = 847
DriveType = 3
TotalSize = 2080.096
FreeSize = 1305.472
End
Begin ComctlLib.ImageList ImageList1
Left = 810
Top = 1710
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 16
ImageHeight = 16
MaskColor = 12632256
_Version = 327682
BeginProperty Images {0713E8C2-850A-101B-AFC0-4210102A8DA7}
NumListImages = 13
BeginProperty ListImage1 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "Frmmain3.frx":216C4
Key = ""
EndProperty
BeginProperty ListImage2 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "Frmmain3.frx":219DE
Key = ""
EndProperty
BeginProperty ListImage3 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "Frmmain3.frx":21CF8
Key = ""
EndProperty
BeginProperty ListImage4 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "Frmmain3.frx":22012
Key = ""
EndProperty
BeginProperty ListImage5 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "Frmmain3.frx":2232C
Key = ""
EndProperty
BeginProperty ListImage6 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "Frmmain3.frx":22646
Key = ""
EndProperty
BeginProperty ListImage7 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "Frmmain3.frx":22960
Key = ""
EndProperty
BeginProperty ListImage8 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "Frmmain3.frx":22C7A
Key = ""
EndProperty
BeginProperty ListImage9 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "Frmmain3.frx":22F94
Key = ""
EndProperty
BeginProperty ListImage10 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "Frmmain3.frx":232AE
Key = ""
EndProperty
BeginProperty ListImage11 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "Frmmain3.frx":235C8
Key = ""
EndProperty
BeginProperty ListImage12 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "Frmmain3.frx":238E2
Key = ""
EndProperty
BeginProperty ListImage13 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "Frmmain3.frx":23BFC
Key = ""
EndProperty
EndProperty
End
Begin VB.Menu MNUWENJ
Caption = "【文件&F】"
WindowList = -1 'True
Begin VB.Menu MNUOP
Caption = "打开文档(&O)"
End
Begin VB.Menu MNU19
Caption = "-"
End
Begin VB.Menu MNUWENJ1
Caption = "系统设置(&S)"
Begin VB.Menu MNUWJ11
Caption = "背景设置(&B)"
End
Begin VB.Menu MNUCANCEL
Caption = "取消背景(&C)"
End
Begin VB.Menu MNU16
Caption = "-"
End
Begin VB.Menu MNUWJ12
Caption = "密码设置(&P)"
End
Begin VB.Menu MNU17
Caption = "-"
End
Begin VB.Menu MNUWJ13
Caption = "新用户添加(&N)"
End
Begin VB.Menu MNU18
Caption = "-"
End
Begin VB.Menu MNUWJ14
Caption = "权限设置(&I)"
End
End
Begin VB.Menu mnuDOT1
Caption = "-"
End
Begin VB.Menu MNUEXIT
Caption = "退出(&X)"
End
End
Begin VB.Menu MNUBASE
Caption = "【基本信息&B】"
Begin VB.Menu MNUBASE1
Caption = "数据录入(&I)"
End
Begin VB.Menu MNU21
Caption = "-"
End
Begin VB.Menu MNUBASE2
Caption = "数据修改(&M)"
End
Begin VB.Menu MNU22
Caption = "-"
End
Begin VB.Menu MNUBASE3
Caption = "数据查询(&S)"
End
Begin VB.Menu MNU23
Caption = "-"
End
Begin VB.Menu MNUBASE4
Caption = "数据统计(&C)"
End
End
Begin VB.Menu MNUMARK
Caption = "【成绩管理&S】"
Begin VB.Menu MNUMARKIN
Caption = "课程成绩录入(&I)"
Begin VB.Menu MNUBXKC
Caption = "必修课程成绩录入(&B)"
End
Begin VB.Menu MNUBX_DOT
Caption = "-"
End
Begin VB.Menu MNUXXKC
Caption = "选修、双学位管理(&X)"
End
End
Begin VB.Menu MNU31
Caption = "-"
End
Begin VB.Menu MNUQUERY
Caption = "教务信息查询(&S)"
End
Begin VB.Menu MNU32
Caption = "-"
End
Begin VB.Menu MNUMARK1
Caption = "学积分计算(&C)"
End
Begin VB.Menu MNU33
Caption = "-"
End
Begin VB.Menu MNUMARKADD
Caption = "成绩库管理(&M)"
End
End
Begin VB.Menu MNUJIAOWU
Caption = "【教务管理&D】"
Begin VB.Menu MNUCONGDU
Caption = "重读学生信息(&R)"
End
Begin VB.Menu MNUCONGDU_DOT
Caption = "-"
End
Begin VB.Menu MNUAUTO
Caption = "自动排课系统(&A)"
End
End
Begin VB.Menu mnuData
Caption = "【数据管理&D】"
Begin VB.Menu mnuDataBase
Caption = "基本情况表(&B)"
Begin VB.Menu mnuDataDR1
Caption = "导入(&I)"
End
Begin VB.Menu mnuDataRC1
Caption = "导出(&O)"
End
End
Begin VB.Menu MNUCHECK
Caption = "数据库校核(&C)"
End
End
Begin VB.Menu MNUHELP
Caption = "【帮助&H】"
Begin VB.Menu MNUHELP2
Caption = "使用说明(&N)"
End
Begin VB.Menu MNUH2
Caption = "-"
End
Begin VB.Menu MNUHELP3
Caption = "版本信息(&C)"
End
Begin VB.Menu mnuh6
Caption = "-"
End
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -