Menggunakan Kontrol Check Box pada VB

Check box atau kotak cek merupakan salah satu kontrol yang berfungsi untuk memilih satu atau beberapa pilihan. Jadi pada check box kita dapat memilih lebih dari satu pilihan yang ditandai dengan checklis pada check box. Kontrol Checkbox mempunyai banyak kegunaan ketika suatu dialog menawarkan pilihan. Memungkinkan user memilih lebih dari satu pilihan. Ketika kontrol tersebut diklik maka kontrol tersebut menunjukkan sebuah keadaan benar atau salah (True atau False).

Peletakan kontrol tersebut pada sebuah form biasanya dilakukan dengan mengisi properti Caption untuk menjelaskan keadaan dari kontrol. Sedangkan kejadian (Event) yang penting dari kontrol tersebut adalah kejadian klik (click event). Sebagai contoh ketika sebuah checkbox diklik, maka akan memberikan dampak pada kontrol yang lain.

Private Sub Check1_Click()

If Check1.Value = 1 Then

  Text2.Text = 200000

Else

  Text2.Text = 0

End If

End Sub

CheckBox memiliki nilai 1 dan 0 (1 = True, 0 = False). Ketika CheckBox dipilih (dicentang) maka akan bernilai 1 dan sebaliknya

LATIHAN

KODE PROGRAM

Private Sub Check1_Click()

If Check1.Value = 1 Then

Text2.Text = 200000

Else

Text2.Text = 0

End If

End Sub

 

Private Sub Check2_Click()

If Check2.Value = 1 Then

Text3.Text = 0.1 * Text1.Text

Else

Text3.Text = 0

End If

End Sub

 

Private Sub Command1_Click()

Text4.Text = Text1.Text – (Val(Text2.Text) + Val(Text3.Text))

End Sub

 

Private Sub command2_click()

END

End Sub

Print Friendly, PDF & Email
Hari

Written by 

admin "Ilmu Itu Tak Ada Yang Tak Bermanfaat"

Leave a Reply

Your email address will not be published.