TUGAS 3

Private Sub Cmdhitung_Click()
Txttotal = Val(Txtn1) + (Txtn2)
End Sub

Private Sub Cmdkluar_Click()
Unload Me
End Sub

Private Sub cmdlagi_Click()
Txtn1 = ""
Txtn2 = ""
Txttotal = ""
Txtn1.SetFocus
End Sub