?? manager.vb
字號:
Public Class Manager
Inherits System.Windows.Forms.Form
#Region " Windows 窗體設計器生成的代碼 "
Public Sub New()
MyBase.New()
'該調用是 Windows 窗體設計器所必需的。
InitializeComponent()
'在 InitializeComponent() 調用之后添加任何初始化
End Sub
'窗體重寫 dispose 以清理組件列表。
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
'Windows 窗體設計器所必需的
Private components As System.ComponentModel.IContainer
'注意: 以下過程是 Windows 窗體設計器所必需的
'可以使用 Windows 窗體設計器修改此過程。
'不要使用代碼編輯器修改它。
Friend WithEvents MainMenu1 As System.Windows.Forms.MainMenu
Friend WithEvents MenuItem5 As xpmenuitem.XpStyle
Friend WithEvents MenuItem6 As xpmenuitem.XpStyle
Friend WithEvents MenuItem7 As xpmenuitem.XpStyle
Friend WithEvents MenuItem8 As xpmenuitem.XpStyle
Friend WithEvents MenuItem9 As xpmenuitem.XpStyle
Friend WithEvents MenuItem10 As xpmenuitem.XpStyle
Friend WithEvents MenuItem11 As xpmenuitem.XpStyle
Friend WithEvents MenuItem12 As xpmenuitem.XpStyle
Friend WithEvents MenuItem13 As xpmenuitem.XpStyle
Friend WithEvents MenuItem14 As xpmenuitem.XpStyle
Friend WithEvents MenuItem15 As xpmenuitem.XpStyle
Friend WithEvents MenuItem16 As xpmenuitem.XpStyle
Friend WithEvents MenuItem17 As xpmenuitem.XpStyle
Friend WithEvents MenuItem18 As xpmenuitem.XpStyle
Friend WithEvents MenuItem19 As xpmenuitem.XpStyle
Friend WithEvents MenuItem20 As xpmenuitem.XpStyle
Friend WithEvents MenuItem21 As xpmenuitem.XpStyle
Friend WithEvents MenuItem22 As xpmenuitem.XpStyle
Friend WithEvents MenuItem23 As xpmenuitem.XpStyle
Friend WithEvents MenuItem24 As xpmenuitem.XpStyle
Friend WithEvents MenuItem25 As xpmenuitem.XpStyle
Friend WithEvents MenuItem26 As xpmenuitem.XpStyle
Friend WithEvents MenuItem27 As xpmenuitem.XpStyle
Friend WithEvents MenuItem28 As xpmenuitem.XpStyle
Friend WithEvents MenuItem1 As xpmenuitem.XpStyle
Friend WithEvents MenuItem2 As xpmenuitem.XpStyle
Friend WithEvents MenuItem3 As xpmenuitem.XpStyle
Friend WithEvents MenuItem4 As xpmenuitem.XpStyle
Friend WithEvents StatusBar1 As System.Windows.Forms.StatusBar
Friend WithEvents StatusBarPanel2 As System.Windows.Forms.StatusBarPanel
Friend WithEvents StatusBarPanel1 As System.Windows.Forms.StatusBarPanel
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(Manager))
Me.MainMenu1 = New System.Windows.Forms.MainMenu
Me.MenuItem1 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem2 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem3 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem4 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem5 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem6 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem7 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem8 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem9 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem10 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem11 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem12 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem13 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem14 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem15 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem16 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem17 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem18 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem19 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem20 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem21 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem22 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem23 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem24 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem25 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem26 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem27 = New StuManager.xpmenuitem.XpStyle
Me.MenuItem28 = New StuManager.xpmenuitem.XpStyle
Me.StatusBar1 = New System.Windows.Forms.StatusBar
Me.StatusBarPanel1 = New System.Windows.Forms.StatusBarPanel
Me.StatusBarPanel2 = New System.Windows.Forms.StatusBarPanel
CType(Me.StatusBarPanel1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.StatusBarPanel2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'MainMenu1
'
Me.MainMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem1, Me.MenuItem5, Me.MenuItem10, Me.MenuItem15, Me.MenuItem20, Me.MenuItem26})
'
'MenuItem1
'
Me.MenuItem1.Index = 0
Me.MenuItem1.MenuItemIcon = Nothing
Me.MenuItem1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem2, Me.MenuItem3, Me.MenuItem4})
Me.MenuItem1.OwnerDraw = True
Me.MenuItem1.Text = "用戶管理"
'
'MenuItem2
'
Me.MenuItem2.Index = 0
Me.MenuItem2.MenuItemIcon = CType(resources.GetObject("MenuItem2.MenuItemIcon"), System.Drawing.Image)
Me.MenuItem2.OwnerDraw = True
Me.MenuItem2.Text = "查詢/刪除用戶"
'
'MenuItem3
'
Me.MenuItem3.Index = 1
Me.MenuItem3.MenuItemIcon = CType(resources.GetObject("MenuItem3.MenuItemIcon"), System.Drawing.Image)
Me.MenuItem3.OwnerDraw = True
Me.MenuItem3.Text = "修改密碼"
'
'MenuItem4
'
Me.MenuItem4.Index = 2
Me.MenuItem4.MenuItemIcon = Nothing
Me.MenuItem4.OwnerDraw = True
Me.MenuItem4.Text = "退出登陸"
'
'MenuItem5
'
Me.MenuItem5.Index = 1
Me.MenuItem5.MenuItemIcon = Nothing
Me.MenuItem5.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem6, Me.MenuItem7, Me.MenuItem8, Me.MenuItem9})
Me.MenuItem5.OwnerDraw = True
Me.MenuItem5.Text = "學籍管理"
'
'MenuItem6
'
Me.MenuItem6.Index = 0
Me.MenuItem6.MenuItemIcon = CType(resources.GetObject("MenuItem6.MenuItemIcon"), System.Drawing.Image)
Me.MenuItem6.OwnerDraw = True
Me.MenuItem6.Text = "添加學生信息"
'
'MenuItem7
'
Me.MenuItem7.Index = 1
Me.MenuItem7.MenuItemIcon = CType(resources.GetObject("MenuItem7.MenuItemIcon"), System.Drawing.Image)
Me.MenuItem7.OwnerDraw = True
Me.MenuItem7.Text = "修改學生信息"
'
'MenuItem8
'
Me.MenuItem8.Index = 2
Me.MenuItem8.MenuItemIcon = CType(resources.GetObject("MenuItem8.MenuItemIcon"), System.Drawing.Image)
Me.MenuItem8.OwnerDraw = True
Me.MenuItem8.Text = "刪除學生信息"
'
'MenuItem9
'
Me.MenuItem9.Index = 3
Me.MenuItem9.MenuItemIcon = CType(resources.GetObject("MenuItem9.MenuItemIcon"), System.Drawing.Image)
Me.MenuItem9.OwnerDraw = True
Me.MenuItem9.Text = "查詢學生信息"
'
'MenuItem10
'
Me.MenuItem10.Index = 2
Me.MenuItem10.MenuItemIcon = Nothing
Me.MenuItem10.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem11, Me.MenuItem12, Me.MenuItem13, Me.MenuItem14})
Me.MenuItem10.OwnerDraw = True
Me.MenuItem10.Text = "班級管理"
'
'MenuItem11
'
Me.MenuItem11.Index = 0
Me.MenuItem11.MenuItemIcon = CType(resources.GetObject("MenuItem11.MenuItemIcon"), System.Drawing.Image)
Me.MenuItem11.OwnerDraw = True
Me.MenuItem11.Text = "添加班級信息"
'
'MenuItem12
'
Me.MenuItem12.Index = 1
Me.MenuItem12.MenuItemIcon = CType(resources.GetObject("MenuItem12.MenuItemIcon"), System.Drawing.Image)
Me.MenuItem12.OwnerDraw = True
Me.MenuItem12.Text = "修改班級信息"
'
'MenuItem13
'
Me.MenuItem13.Index = 2
Me.MenuItem13.MenuItemIcon = CType(resources.GetObject("MenuItem13.MenuItemIcon"), System.Drawing.Image)
Me.MenuItem13.OwnerDraw = True
Me.MenuItem13.Text = "刪除班級信息"
'
'MenuItem14
'
Me.MenuItem14.Index = 3
Me.MenuItem14.MenuItemIcon = CType(resources.GetObject("MenuItem14.MenuItemIcon"), System.Drawing.Image)
Me.MenuItem14.OwnerDraw = True
Me.MenuItem14.Text = "查詢班級信息"
'
'MenuItem15
'
Me.MenuItem15.Index = 3
Me.MenuItem15.MenuItemIcon = Nothing
Me.MenuItem15.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem16, Me.MenuItem17, Me.MenuItem18, Me.MenuItem19})
Me.MenuItem15.OwnerDraw = True
Me.MenuItem15.Text = "成績管理"
'
'MenuItem16
'
Me.MenuItem16.Index = 0
Me.MenuItem16.MenuItemIcon = CType(resources.GetObject("MenuItem16.MenuItemIcon"), System.Drawing.Image)
Me.MenuItem16.OwnerDraw = True
Me.MenuItem16.Text = "添加學生成績"
'
'MenuItem17
'
Me.MenuItem17.Index = 1
Me.MenuItem17.MenuItemIcon = CType(resources.GetObject("MenuItem17.MenuItemIcon"), System.Drawing.Image)
Me.MenuItem17.OwnerDraw = True
Me.MenuItem17.Text = "修改學生成績"
'
'MenuItem18
'
Me.MenuItem18.Index = 2
Me.MenuItem18.MenuItemIcon = CType(resources.GetObject("MenuItem18.MenuItemIcon"), System.Drawing.Image)
Me.MenuItem18.OwnerDraw = True
Me.MenuItem18.Text = "刪除學生成績"
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -