Pertama-tama buatlah desain seperti ini :
Jenis
|
Command
|
Caption
|
Option button
|
Option1
|
perempuan
|
Option button
|
Option1
|
Laki-laki
|
Command Button
|
Command1
|
Proses
|
Textbox
|
Text1
|
Kosong
|
Berikut kodingnya :
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..
makasi ya , jadi bisa ngerjain tugas nih
BalasHapus