Tugas 3 Penjumlahan Tidak Menggunakan Keypress

Tugas 3 Penjumlahan Tidak Menggunakan Keypress

 

Berikut Source Codenya:

Private Sub cmdhitung_Click()

txttotal = Val(txtnilai1) + (txtnilai2)

End Sub

Private Sub cmdlagi_Click()

txtnilai1 = ""

txtnilai2 = ""

txttotal = ""

txtnilai1.SetFocus

End Sub

Private Sub cmdkeluar_click()

Unload Me

End Sub