Jenis | Command | Caption |
Option button | Option1 | perempuan |
Option button | Option1 | Laki-laki |
Command Button | Command1 | Proses |
Textbox | Text1 | Kosong |
Private Sub Command1_Click()
If Option1.Value = True Then
Text1.Text = "Saya perempuan"
Else
Text1.Text = "Saya laki-laki"
End If
End Sub
Option1
Ini contoh hasilnya :
Selamat mencoba... Moga bermanfaat..