Prelim Exam2

Private Sub Check1_Click() Label1.Visible = True Label1.Visible = Check1.Value End Sub Private Sub Command1_Click() Frame1.Enabled = True End Sub Private Sub Command2_Click() Frame2.Visible = False Frame2.Enabled = False Frame1.Enabled = False Image1.Visible = False Image2.Visible = False Image3.Visible = False Image4.Visible = False Command1.Enabled = True Option1.Value = False Option2.Value = False Option3.Value = False Option4.Value = False Command2.Enabled = False Label1.Caption = "" Check1.Value = 0 End Sub Private Sub Command3_Click() End End Sub Private Sub Form_Load() Frame1.Enabled = False Frame2.Visible = False End Sub Private Sub Option1_Click() Image2.Visible = False Image1.Visible = False Image3.Visible = True Image4.Visible = False Frame2.Visible = True Frame2.Enabled = True Command2.Enabled = True Command1.Enabled = False Label1.Caption = "This is the flag of Italy"

End Sub Private Sub Option2_Click() Image3.Visible = False Image2.Visible = False Image1.Visible = True Image4.Visible = False Frame2.Visible = True

Frame2.Enabled = Command2.Enabled Command1.Enabled Label1.Caption =

True = True = False "This is the the flag of mexico"

End Sub Private Sub Option3_Click() Image4.Visible = True Image3.Visible = False Image2.Visible = False Image1.Visible = False Frame2.Visible = True Frame2.Enabled = True Command2.Enabled = True Command1.Enabled = False Label1.Caption = "This is the the flag of U.S.A." End Sub Private Sub Option4_Click() Image2.Visible = True Image3.Visible = False Image1.Visible = False Image4.Visible = False Frame2.Visible = True Frame2.Enabled = True Command2.Enabled = True Command1.Enabled = False Label1.Caption = "This is the the flag of Philpiines" End Sub