tugas 2

Private Sub Command1_Click()
Text1 = " "
Text2 = " "
Text3 = " "
Text1.SetFocus
End Sub

Private Sub Command2_Click()
Text1 = " "
Text2 = " "
Text3 = " "
Text2.SetFocus
End Sub

Private Sub Command3_Click()
Unload Me
End Sub

Private Sub Label2_Click()

End Sub