Visual Basic 6.0 (Option pilihan warna berbeda)

Imran       Visual Basic    Comment   

__________________________________________________________________________________

Private Sub Command1_Click()

End

End Sub

Private Sub Option1_Click(Index As Integer)

Label1.ForeColor = vbRed

End Sub

Private Sub Option2_Click()

Label1.ForeColor = vbYellow

End Sub

Private Sub Option3_Click()

Label1.ForeColor = vbGreen

End Sub

Private Sub Option4_Click()

Label1.ForeColor = vbWhite

End Sub

Private Sub Option5_Click()

Label1.ForeColor = vbBlue

End Sub

Private Sub Option6_Click()

Label1.ForeColor = vbBlack

End Sub