Google Search
Custom Search
Saturday, May 16, 2009
Pengunaan Textbox dan radiobutton
ini adalah kode programnya:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Label2.Text = "Nama Anda adalah: " + TextBox1.Text
End Sub
Private Sub RadioButton1_CheckedChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged
Label4.Text = "Anda berjenis kelamin : " + RadioButton1.Text
End Sub
Private Sub RadioButton2_CheckedChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadioButton2.CheckedChanged
Label4.Text = "Anda berjenis kelamin : " + RadioButton2.Text
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
End Class
keterangan:
Label1(Name)-> Masukkan Nama Anda:(Caption)
TextBox1(Name)
Label2(Name)-> (Caption)
Label3(Name)-> Jenis Kelamin:(Caption)
Label4(Name)-> (Caption)
RadioButton1(Name)-> Laki-laki(Caption)
RadioButton2(Name)-> Laki-laki(Caption)
Button1(Name)-> OK(Caption)
Selamat mencoba,
Ridon-Na70