.NET Practical Slip 22 Q B

Answer:

Public Class Form1

    Private Sub RedToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles RedToolStripMenuItem.Click

        Me.BackColor = Color.Red

    End Sub

 

    Private Sub GreenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles GreenToolStripMenuItem.Click

        Me.BackColor = Color.Green

    End Sub

 

    Private Sub BlueToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles BlueToolStripMenuItem.Click

        Me.BackColor = Color.Blue

    End Sub

 

    Private Sub MaximizeToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles MaximizeToolStripMenuItem.Click

        Me.WindowState = FormWindowState.Maximized

    End Sub

 

    Private Sub MiniMToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles MiniMToolStripMenuItem.Click

        Me.WindowState = FormWindowState.Minimized

    End Sub

 

    Private Sub RestoreToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles RestoreToolStripMenuItem.Click

        Me.WindowState = FormWindowState.Normal

    End Sub

End Class