buat nama mahasiswa



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

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

Private Sub Command1_Click()
Label2.Caption = Text1.Text
End Sub

Private Sub Command2_Click()
End
End Sub

Private Sub Option1_Click()
Label2.ForeColor = vbBlue
End Sub

Private Sub Option2_Click()
Label2.ForeColor = vbRed
End Sub


Komentar

Postingan populer dari blog ini

PEMILIHAN MULI MEKHANAI

STMIK PRINGSEWU GELAR POSDIKTI 2017 GELOMBANG 1

STMIK PRINGSEWU GELAR PRA PENDIDIKAN DASAR MILITER (PRADIKSARMIL)