Tugas1_1

Private Sub cmdbatal_Click()
Text1 = ""
Text2 = ""
Text3 = ""
Text1.SetFocus

End Sub

Private Sub cmdkeluar_Click()
Unload Me
End Sub

Private Sub cmdlagi_Click()
Text1 = ""
Text2 = ""
Text3 = ""
Text1.SetFocus

End Sub