Write a VB.NET program to design the following form; it contains three menus: Color (Red, Blue, Green), Window (Maximize, Minimize, Restore), and Exit. On selection of any menu or submenu, the result should affect the form control (for example, if the user selects Red color from the Color menu, the back color of the form should change to Red, and if the user selects Maximize from the Window menu, the form should be maximized).

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
Scroll to Top