langsung saja kawan kawan buat designya seperti ini..
dengan menambahkan 2 commond button,2 label dan 2 frame serta 2 option dan checkbook..
bila sudah di design seperti di atas langsung saja ketik kode di bawah ini:
Private Sub Command1_Click()
Label2.Caption = Text1.Text
End Sub
Private Sub Command2_Click()
Unload Me
End Sub
Private Sub Option1_Click()
Label2.ForeColor = vbRed
End Sub
Private Sub Option2_Click()
Label2.ForeColor = vbGreen
End Sub
Private Sub Check1_Click()
Label2.FontBold = Check1.Value
End Sub
Private Sub Check2_Click()
Label2.FontItalic = Check2.Value
End Sub
sekian dulu dari saya selamat berkarya///.....
Tidak ada komentar:
Posting Komentar