⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 frmmain.vb

📁 师生情况管理系统
💻 VB
📖 第 1 页 / 共 3 页
字号:
        '
        'RibbonBar2
        '
        Me.RibbonBar2.AutoOverflowEnabled = True
        Me.RibbonBar2.Dock = System.Windows.Forms.DockStyle.Fill
        Me.RibbonBar2.Items.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.ButtonItem2})
        Me.RibbonBar2.Location = New System.Drawing.Point(3, 0)
        Me.RibbonBar2.Name = "RibbonBar2"
        Me.RibbonBar2.Size = New System.Drawing.Size(786, 67)
        Me.RibbonBar2.Style = DevComponents.DotNetBar.eDotNetBarStyle.Office2007
        Me.RibbonBar2.TabIndex = 0
        Me.RibbonBar2.Text = "其他工具"
        '
        'ButtonItem2
        '
        Me.ButtonItem2.Image = CType(resources.GetObject("ButtonItem2.Image"), System.Drawing.Image)
        Me.ButtonItem2.ImagePaddingHorizontal = 8
        Me.ButtonItem2.Name = "ButtonItem2"
        Me.ButtonItem2.Text = "ButtonItem2"
        '
        'RibbonTabItem1
        '
        Me.RibbonTabItem1.Checked = True
        Me.RibbonTabItem1.ImagePaddingHorizontal = 8
        Me.RibbonTabItem1.Name = "RibbonTabItem1"
        Me.RibbonTabItem1.Panel = Me.RibbonPanel1
        Me.RibbonTabItem1.Text = "常用菜单"
        '
        'RibbonTabItem3
        '
        Me.RibbonTabItem3.ImagePaddingHorizontal = 8
        Me.RibbonTabItem3.Name = "RibbonTabItem3"
        Me.RibbonTabItem3.Panel = Me.RibbonPanel3
        Me.RibbonTabItem3.Text = "其他工具"
        '
        'Office2007StartButton1
        '
        Me.Office2007StartButton1.AutoExpandOnClick = True
        Me.Office2007StartButton1.CanCustomize = False
        Me.Office2007StartButton1.HotTrackingStyle = DevComponents.DotNetBar.eHotTrackingStyle.Image
        Me.Office2007StartButton1.Image = CType(resources.GetObject("Office2007StartButton1.Image"), System.Drawing.Image)
        Me.Office2007StartButton1.ImagePaddingHorizontal = 2
        Me.Office2007StartButton1.ImagePaddingVertical = 2
        Me.Office2007StartButton1.Name = "Office2007StartButton1"
        Me.Office2007StartButton1.ShowSubItems = False
        Me.Office2007StartButton1.SubItems.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.ItemContainer1})
        Me.Office2007StartButton1.Text = "&File"
        '
        'ItemContainer1
        '
        '
        'ItemContainer1.BackgroundStyle
        '
        Me.ItemContainer1.BackgroundStyle.Class = "RibbonFileMenuContainer"
        Me.ItemContainer1.LayoutOrientation = DevComponents.DotNetBar.eOrientation.Vertical
        Me.ItemContainer1.MinimumSize = New System.Drawing.Size(0, 0)
        Me.ItemContainer1.Name = "ItemContainer1"
        Me.ItemContainer1.SubItems.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.ItemContainer2, Me.ItemContainer5})
        '
        'ItemContainer2
        '
        '
        'ItemContainer2.BackgroundStyle
        '
        Me.ItemContainer2.BackgroundStyle.Class = "RibbonFileMenuTwoColumnContainer"
        Me.ItemContainer2.ItemSpacing = 0
        Me.ItemContainer2.MinimumSize = New System.Drawing.Size(0, 0)
        Me.ItemContainer2.Name = "ItemContainer2"
        Me.ItemContainer2.SubItems.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.ItemContainer3, Me.ItemContainer4})
        '
        'ItemContainer3
        '
        '
        'ItemContainer3.BackgroundStyle
        '
        Me.ItemContainer3.BackgroundStyle.Class = "RibbonFileMenuColumnOneContainer"
        Me.ItemContainer3.LayoutOrientation = DevComponents.DotNetBar.eOrientation.Vertical
        Me.ItemContainer3.MinimumSize = New System.Drawing.Size(120, 0)
        Me.ItemContainer3.Name = "ItemContainer3"
        Me.ItemContainer3.SubItems.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.BtnLockUp, Me.BtnClose, Me.BtnCloseAll, Me.BtnUserManage, Me.BtnSystemSet})
        '
        'BtnLockUp
        '
        Me.BtnLockUp.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
        Me.BtnLockUp.Image = CType(resources.GetObject("BtnLockUp.Image"), System.Drawing.Image)
        Me.BtnLockUp.ImagePaddingHorizontal = 8
        Me.BtnLockUp.Name = "BtnLockUp"
        Me.BtnLockUp.SubItemsExpandWidth = 24
        Me.BtnLockUp.Text = "锁定"
        '
        'BtnClose
        '
        Me.BtnClose.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
        Me.BtnClose.Image = CType(resources.GetObject("BtnClose.Image"), System.Drawing.Image)
        Me.BtnClose.ImagePaddingHorizontal = 8
        Me.BtnClose.Name = "BtnClose"
        Me.BtnClose.SubItemsExpandWidth = 24
        Me.BtnClose.Text = "关闭当前"
        '
        'BtnCloseAll
        '
        Me.BtnCloseAll.BeginGroup = True
        Me.BtnCloseAll.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
        Me.BtnCloseAll.Image = CType(resources.GetObject("BtnCloseAll.Image"), System.Drawing.Image)
        Me.BtnCloseAll.ImagePaddingHorizontal = 8
        Me.BtnCloseAll.Name = "BtnCloseAll"
        Me.BtnCloseAll.SubItemsExpandWidth = 24
        Me.BtnCloseAll.Text = "关闭所有"
        '
        'BtnUserManage
        '
        Me.BtnUserManage.BeginGroup = True
        Me.BtnUserManage.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
        Me.BtnUserManage.Image = CType(resources.GetObject("BtnUserManage.Image"), System.Drawing.Image)
        Me.BtnUserManage.ImagePaddingHorizontal = 8
        Me.BtnUserManage.Name = "BtnUserManage"
        Me.BtnUserManage.SubItemsExpandWidth = 24
        Me.BtnUserManage.Text = "用户管理"
        '
        'BtnSystemSet
        '
        Me.BtnSystemSet.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
        Me.BtnSystemSet.Image = CType(resources.GetObject("BtnSystemSet.Image"), System.Drawing.Image)
        Me.BtnSystemSet.ImagePaddingHorizontal = 8
        Me.BtnSystemSet.Name = "BtnSystemSet"
        Me.BtnSystemSet.SubItemsExpandWidth = 24
        Me.BtnSystemSet.Text = "系统设置"
        '
        'ItemContainer4
        '
        '
        'ItemContainer4.BackgroundStyle
        '
        Me.ItemContainer4.BackgroundStyle.Class = "RibbonFileMenuColumnTwoContainer"
        Me.ItemContainer4.LayoutOrientation = DevComponents.DotNetBar.eOrientation.Vertical
        Me.ItemContainer4.MinimumSize = New System.Drawing.Size(180, 0)
        Me.ItemContainer4.Name = "ItemContainer4"
        Me.ItemContainer4.SubItems.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.ButtonItem6, Me.ButtonItem15, Me.labelItem8, Me.BtnDepartment, Me.BtnClass, Me.BtnSpecialty, Me.BtnCurricula, Me.BtnBooks})
        '
        'ButtonItem6
        '
        Me.ButtonItem6.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
        Me.ButtonItem6.Image = CType(resources.GetObject("ButtonItem6.Image"), System.Drawing.Image)
        Me.ButtonItem6.ImagePaddingHorizontal = 8
        Me.ButtonItem6.Name = "ButtonItem6"
        Me.ButtonItem6.SubItems.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.BtnStudentInfo, Me.BtnStudentDuty, Me.BtnStudentGrade, Me.BtnStudentHostel})
        Me.ButtonItem6.SubItemsExpandWidth = 24
        Me.ButtonItem6.Text = "学生管理"
        '
        'BtnStudentInfo
        '
        Me.BtnStudentInfo.Image = CType(resources.GetObject("BtnStudentInfo.Image"), System.Drawing.Image)
        Me.BtnStudentInfo.ImagePaddingHorizontal = 8
        Me.BtnStudentInfo.Name = "BtnStudentInfo"
        Me.BtnStudentInfo.Text = "学生基本信息管理"
        '
        'BtnStudentDuty
        '
        Me.BtnStudentDuty.Image = CType(resources.GetObject("BtnStudentDuty.Image"), System.Drawing.Image)
        Me.BtnStudentDuty.ImagePaddingHorizontal = 8
        Me.BtnStudentDuty.Name = "BtnStudentDuty"
        Me.BtnStudentDuty.Text = "学生职务管理"
        '
        'BtnStudentGrade
        '
        Me.BtnStudentGrade.Image = CType(resources.GetObject("BtnStudentGrade.Image"), System.Drawing.Image)
        Me.BtnStudentGrade.ImagePaddingHorizontal = 8
        Me.BtnStudentGrade.Name = "BtnStudentGrade"
        Me.BtnStudentGrade.Text = "学生成绩管理"
        '
        'BtnStudentHostel
        '
        Me.BtnStudentHostel.Image = CType(resources.GetObject("BtnStudentHostel.Image"), System.Drawing.Image)
        Me.BtnStudentHostel.ImagePaddingHorizontal = 8
        Me.BtnStudentHostel.Name = "BtnStudentHostel"
        Me.BtnStudentHostel.Text = "学生宿舍管理"
        '
        'ButtonItem15
        '
        Me.ButtonItem15.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
        Me.ButtonItem15.Image = CType(resources.GetObject("ButtonItem15.Image"), System.Drawing.Image)
        Me.ButtonItem15.ImagePaddingHorizontal = 8
        Me.ButtonItem15.Name = "ButtonItem15"
        Me.ButtonItem15.SubItems.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.BtnTeacherInfo, Me.BtnTeacherDuty, Me.BtnTeacherPay})
        Me.ButtonItem15.SubItemsExpandWidth = 24
        Me.ButtonItem15.Text = "教师管理"
        '
        'BtnTeacherInfo
        '
        Me.BtnTeacherInfo.Image = CType(resources.GetObject("BtnTeacherInfo.Image"), System.Drawing.Image)
        Me.BtnTeacherInfo.ImagePaddingHorizontal = 8
        Me.BtnTeacherInfo.Name = "BtnTeacherInfo"
        Me.BtnTeacherInfo.Text = "教师基本信息管理"
        '
        'BtnTeacherDuty
        '
        Me.BtnTeacherDuty.Image = CType(resources.GetObject("BtnTeacherDuty.Image"), System.Drawing.Image)
        Me.BtnTeacherDuty.ImagePaddingHorizontal = 8
        Me.BtnTeacherDuty.Name = "BtnTeacherDuty"
        Me.BtnTeacherDuty.Text = "教师职务管理"
        '
        'BtnTeacherPay
        '
        Me.BtnTeacherPay.Image = CType(resources.GetObject("BtnTeacherPay.Image"), System.Drawing.Image)
        Me.BtnTeacherPay.ImagePaddingHorizontal = 8
        Me.BtnTeacherPay.Name = "BtnTeacherPay"
        Me.BtnTeacherPay.Text = "教师工资管理"
        '
        'labelItem8
        '
        Me.labelItem8.BorderSide = DevComponents.DotNetBar.eBorderSide.Bottom
        Me.labelItem8.BorderType = DevComponents.DotNetBar.eBorderType.Etched
        Me.labelItem8.CanCustomize = False
        Me.labelItem8.Name = "labelItem8"
        Me.labelItem8.Stretch = True
        '
        'BtnDepartment
        '
        Me.BtnDepartment.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
        Me.BtnDepartment.Image = CType(resources.GetObject("BtnDepartment.Image"), System.Drawing.Image)
        Me.BtnDepartment.ImagePaddingHorizontal = 8
        Me.BtnDepartment.Name = "BtnDepartment"
        Me.BtnDepartment.SubItemsExpandWidth = 24
        Me.BtnDepartment.Text = "系部管理"
        '
        'BtnClass
        '
        Me.BtnClass.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
        Me.BtnClass.Image = CType(resources.GetObject("BtnClass.Image"), System.Drawing.Image)
        Me.BtnClass.ImagePaddingHorizontal = 8
        Me.BtnClass.Name = "BtnClass"
        Me.BtnClass.SubItemsExpandWidth = 24
        Me.BtnClass.Text = "班级管理"
        '
        'BtnSpecialty
        '
        Me.BtnSpecialty.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
        Me.BtnSpecialty.Image = CType(resources.GetObject("BtnSpecialty.Image"), System.Drawing.Image)
        Me.BtnSpecialty.ImagePaddingHorizontal = 8
        Me.BtnSpecialty.Name = "BtnSpecialty"
        Me.BtnSpecialty.SubItemsExpandWidth = 24
        Me.BtnSpecialty.Text = "专业管理"
        '
        'BtnCurricula
        '
        Me.BtnCurricula.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
        Me.BtnCurricula.Image = CType(resources.GetObject("BtnCurricula.Image"), System.Drawing.Image)
        Me.BtnCurricula.ImagePaddingHorizontal = 8
        Me.BtnCurricula.Name = "BtnCurricula"
        Me.BtnCurricula.Text = "课程管理"
        '
        'BtnBooks
        '
        Me.BtnBooks.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
        Me.BtnBooks.Image = CType(resources.GetObject("BtnBooks.Image"), System.Drawing.Image)
        Me.BtnBooks.ImagePaddingHorizontal = 8
        Me.BtnBooks.Name = "BtnBooks"
        Me.BtnBooks.SubItemsExpandWidth = 24
        Me.BtnBooks.Text = "教材管理"
        '
        'ItemContainer5
        '
        '
        'ItemContainer5.BackgroundStyle
        '
        Me.ItemContainer5.BackgroundStyle.Class = "RibbonFileMenuBottomContainer"
        Me.ItemContainer5.HorizontalItemAlignment = DevComponents.DotNetBar.eHorizontalItemsAlignment.Right
        Me.ItemContainer5.MinimumSize = New System.Drawing.Size(0, 0)
        Me.ItemContainer5.Name = "ItemContainer5"
        Me.ItemContainer5.SubItems.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.BtnLogout, Me.BtnExit})
        '
        'BtnLogout
        '
        Me.BtnLogout.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
        Me.BtnLogout.ColorTable = DevComponents.DotNetBar.eButtonColor.OrangeWithBackground
        Me.BtnLogout.Image = CType(resources.GetObject("BtnLogout.Image"), System.Drawing.Image)
        Me.BtnLogout.ImagePaddingHorizontal = 8
        Me.BtnLogout.Name = "BtnLogout"
        Me.BtnLogout.SubItemsExpandWidth = 24
        Me.BtnLogout.Text = "注销"
        '
        'BtnExit
        '
        Me.BtnExit.ButtonStyle = DevComponents.DotNetBar.eButtonStyle.ImageAndText
        Me.BtnExit.ColorTable = DevComponents.DotNetBar.eButtonColor.OrangeWithBackground
        Me.BtnExit.Image = CType(resources.GetObject("BtnExit.Image"), System.Drawing.Image)
        Me.BtnExit.ImagePaddingHorizontal = 8
        Me.BtnExit.Name = "BtnExit"
        Me.BtnExit.SubItemsExpandWidth = 24
        Me.BtnExit.Text = "退出系统"
        '
        'QatCustomizeItem1
        '
        Me.QatCustomizeItem1.Name = "QatCustomizeItem1"
        '
        'SkinUI1
        '
        Me.SkinUI1.Active = True
        Me.SkinUI1.Button = True
        Me.SkinUI1.Caption = True
        Me.SkinUI1.CheckBox = True
        Me.SkinUI1.ComboBox = True
        Me.SkinUI1.ContextMenu = True
        Me.SkinUI1.DisableTag = 999
        Me.SkinUI1.Edit = True
        Me.SkinUI1.GroupBox = True
        Me.SkinUI1.ImageList = Nothing
        Me.SkinUI1.MaiMenu = True
        Me.SkinUI1.Panel = True
        Me.SkinUI1.Progress = True
        Me.SkinUI1.RadioButton = True
        Me.SkinUI1.ScrollBar = True
        Me.SkinUI1.SkinFile = "I:\Visual Studio Projects\SchoolManage\Office 2007-OFFICE07.skn"
        Me.SkinUI1.SkinSteam = Nothing
        Me.SkinUI1.Spin = True
        Me.SkinUI1.StatusBar = True
        Me.SkinUI1.SystemMenu = True

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -