Ko Ma BSI

Private Sub Command1_Click()

Label3.Caption = Text1.Text

Label3.ForeColor = vbRed

Label3.BackColor = vbWhite

End Sub

Private Sub Command2_Click()

Label3.Caption = ""

Text1.Text = ""

Text1.SetFocus

End Sub

Private Sub Command3_Click()

MsgBox "Keluar", 16, "Info"

End

End Sub