Program 6 Merubah Warna Dan Font Masukkan Nama Dan Npm Anda





Private Sub Chk1_Click()
lbl2.FontBold = Chk1.Value
End Sub


Private Sub Chk2_Click()
    lbl2.FontItalic = Chk2.Value
End Sub


Private Sub Cmd1_Click()
    lbl2.Caption = txt1.Text
End Sub

Private Sub Cmd2_Click()
   unload me
End Sub

Private Sub Opt1_Click()
    lbl2.ForeColor = vbBlue
End Sub

Private Sub Opt2_Click()
    lbl2.ForeColor = vbRed
End Sub


Komentar

Postingan populer dari blog ini

Tutorial

Teknologi Yang Akan Menjadi Tren Di Tahun 2017

STMIK PRINGSEWU GELAR UPACARA HARI SUMPAH PEMUDA YANG KE 89 BERSAMA MENWA, BEM SERTA MAHASISWA