TEBAL MIRINGNYA LABEL MENGGUNAKAN VB

selamat malam pembaca setia kumpulancoding.blogspot.com :D
sudah lama sekal rasanya saya meninggalkan dunia blogger, blogger cacat maksudnya.... :D

baikLah untuk membuka pertemuan kita kembali, saya akan mempostingkan cara untuk mengubah warna pada label dan membuat dia bercetak tebal atau bercetak miring.
tutorial ini sangat sederhana dan sangat awam sekali, tapi saya rasa cocok untuk memulai postingan saya yang sudah break selama beberapa bulan.....

yang pertama design form seperti dibawah ini






bagian yang tertulis TRANIUS EKO adalah sebuah label, sedangkan tebal dan miring menggunakan check, lalu yang merah dan biru menggunakan option.

setelah itu buat coding di bagian option dan check, seperti dibawah ini...

Private Sub Check1_Click()
    Label1.FontBold = Check1.Value
End Sub

Private Sub Check2_Click()
    Label1.FontItalic = Check2.Value
End Sub

Private Sub Option1_Click()
    Label1.ForeColor = vbRed
End Sub

Private Sub Option2_Click()
    Label1.ForeColor = vbBlue
End Sub

hasilnya dibawah ini :