Cara Menggunakan Label

Label pada Visual Basic 6.0 mungkin adalah komponen ToolBox yang paling sering digunakan dalam pembuatan program dengan Aplikasi Visual Basic 6.0. Komponen label ini bisa kita gunakan untuk memberikan Judul, keterangan dan masih banyak lagi.
Untuk memasukkan Label ke Form caranya sangat mudah, bisa dengan cara Drag Drop atau dengan cara Double klik pada komponen Label yang ada di ToolBox.

Seperti halnya Form, Label pun juga mempunyai Property atau Properties. Berikut Properti Label yang paling sering digunakan.

1. Name:
Berisi nama Label, nama ini harus unik dan tidak boleh sama dengan nama Label yang lainnya.
2. Alignment:
Berfungsi untuk mengatur perataan text pada Label, seperti rata kanan, rata kiri dan rata tengah.
3. BackColor:
Berfungsi memberi warna pada backgroud Label.
4. BackStyle:
Berisi 2 Pilihan:
- Opaque: Pilih ini jika background Label ingin berwarna.
- Transparent: Pilih ini jika backgroud ingin dibuat transparan (tanpa warna)
5. Caption:
Befungsi memberikan keterangan (text) pada Label. contoh kita masukkan text "Hello Word !!" setelah itu coba tekan tombol F5. Maka hasilnya akan seperti gambar dibawah ini:





6. Font:
Digunakan untuk memilih jenis dan ukuran Font untuk Label.
7. ForeColor:
Digunakan untuk mewarnai Text pada Label.
8. Height:
Berfungsi mengatur Tinggi Label.
9. Left:
igunakan untuk mengatur jarak Label dari kiri Form.
10. ToolTipText:
Memberikan semacam keterangan (tooltip) ketika Cursor berada diatas Label.
11. Top:
Digunakan untuk mengatur jarak Label dari atas pada Form.
12. Width:
Berfungsi Mengatur lebar Label.

Selain mengedit langsung pada jendela properties, untuk mengubah properti label bisa juga menggunakan code script. coba klik kanan pada form dan klik view code untuk membuka jendela code, kemudian masukkan script code berikut ini:

Private Sub Form_Load()

Label1.Alignment = 2

Label1.BackColor = vbRed

Label1.Caption = "Hello Word !!"

Label1.Font = "Times New Roman"

Label1.FontSize = 16

Label1.FontBold = True

Label1.ForeColor = vbYellow

End Sub

Atau bisa juga dengan kode yang lebih singkat seperti dibawah ini:

Private Sub Form_Load()

With Label1

.Alignment = 2

.BackColor = vbRed

.Caption = "Hello Word !!"

.Font = "Times New Roman"

.FontSize = 16

.FontBold = True

.ForeColor = vbYellow

End With

End Sub

Hasilnya seperti gambar dibawah ini:

 

 

Semoga berhasil.....