Penjumlahan

Private Sub Cmdhitung_Click()
txttotal = Val(txtnilai1) + Val(txtnilai2)
End Sub

Private Sub Cmdkeluar_Click()
Unload Me
End Sub

Private Sub Cmdlagi_Click()
txtnilai1 = ""
txtnilai2 = ""
txttotal = ""
txtnilai1.SetFocus
End Sub