Contoh :
Sorce Code Programnnya :
Label3.FontItalic = Check1.Value
Label4.FontItalic = Check1.Value
End Sub
Private Sub Check2_Click()
Label3.FontBold = Check2.Value
Label4.FontBold = Check2.Value
End Sub
Private Sub Command1_Click()
Label3.Caption = Text1.Text
Label4.Caption = Combo1
End Sub
Private Sub Command2_Click()
Unload Me
End Sub
Private Sub Form_Load()
Combo1.AddItem "SISTEM INFORMASI"
Combo1.AddItem "PERTAMBANGAN"
End Sub
Private Sub Option1_Click()
Label3.ForeColor = vbRed
Label4.ForeColor = vbRed
End Sub
Private Sub Option2_Click()
Label3.ForeColor = vbBlue
Label4.ForeColor = vbBlue
End Sub
Semoga bermanfaat...................
Kunjungi juga channel video youtube saya : KLIK DISINI
atau Klik tombol Subscribe dibawah.
I.A.H Channel