tugas 1 program 1

private Sub Cmdbatal_Click()

Txtnpm = ""

Txtnama = ""

Txtalamat = ""

Txtnpm.SetFocus

End Sub

private Sub Cmdkeluar_Click()

Unload Me

End Sub

Private Sub Cmdlagi_Click()

Txtnpm = ""

Txtnama = ""

Txtalamat = ""

Txtnpm.SetFocus

End Sub