Public Class Form5

    Private Sub 退出ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 退出ToolStripMenuItem.Click


    End Sub

    Private Sub 成績(jī)登記ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 成績(jī)登記ToolStripMenuItem.Click
        Dim f4 As New Form4
        Form4.Show()

    End Sub

    Private Sub 成績(jī)查詢ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 成績(jī)查詢ToolStripMenuItem.Click
        Dim f3 As New Form3
        Form3.Show()

    End Sub

    Private Sub 選課ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Dim f6 As New Form6
        Form6.Show()

    End Sub

    Private Sub 添加課程ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 添加課程ToolStripMenuItem.Click
        Dim f7 As New Form7
        Form7.Show()
    End Sub

    Private Sub Form5_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load


    End Sub

    Private Sub 選課ToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 選課ToolStripMenuItem1.Click
        Dim f6 As New Form6
        Form6.Show()
    End Sub

    Private Sub 修改課程ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 修改課程ToolStripMenuItem.Click
        Dim f2 As New Form2
        Form2.Show()

    End Sub

    Private Sub 退出ToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 退出ToolStripMenuItem1.Click
        End
    End Sub

    Private Sub 幫助ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 幫助ToolStripMenuItem.Click
        Dim f9 As New Form9

        f9.Show()

    End Sub
End Class