Menggunakan CheckBox pada VB 6

Menggunakan CheckBox pada VB 6

   Melanjutkan tentang tutorial dasar Visual Basic 6.0 untuk Pemula, kali ini kita akan belajar tentang CheckBox. CheckBox bisa digunakan untuk menampilkan suatu pilihan, seperti contohnya pada aplikasi yang dibuat untuk aktif ketika komputer dinyalakan, biasanya digunakan CheckBox agar user bisa memilih untuk mengaktifkan atau tidak menu aktifkan komputer saat menyala.
   Untuk menampilkan CheckBox ke dalam Form caranya sama dengan menampilkan komponen lainnya dari ToolBox yaitu dengan cara drag drop ke Form atau bisa  juga double klik pada CheckBox.

Untuk Properti CheckBox yang sering digunakan yaitu:

1. Name:
Berisi nama CheckBox, nama ini harus unik dan tidak boleh sama dengan nama CheckBox yang lainnya, Defaultnya adalah Check1
2. BackColor:
Berfungsi memberi warna pada backgroud CheckBox.
3. Caption:
Fungsinya untuk menampilkan text atau caption pada CheckBox.
4. Font:
Digunakan untuk menentukan jenis dan ukuran Font untuk CheckBox.
5. ForeColor:
Digunakan untuk mewarnai Text pada CheckBox.
6. Height:
Berfungsi mengatur Tinggi CheckBox.
7. Left:
Digunakan untuk mengatur jarak CheckBox dari kiri Form.
8. Top:
Digunakan untuk mengatur jarak CheckBox dari atas pada Form.
9. Width:
Berfungsi Mengatur lebar CheckBox.

Untuk Properties CheckBox yang lain bisa di coba sendiri. Untuk lebih mendalami tentang penggunaan CheckBox kita akan belajar membuat aplikasi sederhana dengan memanfaat ChekBox.
Ikuti langkah-langkahnya berikut ini:

1. Buka program Visual Basic 6.0 kemudian pilih Standard EXE
2. Tambahkan 3 buah CheckBox dan 1 buah Label.
- Ubah Caption pada CheckBox1 dari Check1 menjadi Miring.
- Ubah Caption pada CheckBox2 dari Check2 menjadi Tebal.
- Ubah Caption pada CheckBox3 dari Check3 menjadi Merah.
- Untuk Label1 ubah widthnya menjadi 4.200.
3. Kemudian aturlah posisi CheckBox dan Label seperti gambar dibawah ini:





4. Selanjutnya buka jendela Kode (klik kanan Form1 kemudian klik View Code).
5. Kemudian pada jendela kode masukkan kode/listing berikut ini:

Private Sub Form_Load()
'Kode ketika Form pertama dibuka
Label1.FontSize = 14
Label1.Caption = "Belajar Visual Basic 6.0"
End Sub

Private Sub Check1_Click()
'Kode untuk pilihan CheckBox1
If Check1.Value = 1 Then
    Label1.FontItalic = True
Else
    Label1.FontItalic = False
End If
End Sub

Private Sub Check2_Click()
'Kode untuk pilihan CheckBox2
If Check2.Value = 1 Then
    Label1.FontBold = True
Else
    Label1.FontBold = False
End If
End Sub

Private Sub Check3_Click()
'Kode untuk pilihan CheckBox3
If Check3.Value = 1 Then
    Label1.ForeColor = vbRed
Else
    Label1.ForeColor = vbBlack
End If
End Sub

[ Download Source Code ]


6. Jika sudah selesai tekan F5 atau klik Menu Run > Start untuk mengujinya. Hasilnya jika CheckBox1 di pilih maka text pada Label1 akan menjadi italic atau miring, jika CheckBox2 dipilih maka text pada Label1 menjadi bold atau tebal dan jika CheckBox3 yang dipilih maka text pada Label1 akan berubah warna menjadi merah.

Mungkin sekian dulu pembelajaran tentang CheckBox, Semoga Bermanfaat.....