PENJUMLAHAN TANPA KEYPRESS

sebelum di isi.

sesudah di isi.

Private Sub cmdhitung_Click()

txttotal = Val(txtn1) + Val(txtn2)

End Sub

Private Sub cmdkeluar_Click()

Unload Me

End Sub

Private Sub cmdlagi_Click()

txtn1 = ""

txtn2 = ""

txttotal = ""

txttotal.SetFocus

End Sub

Private Sub cmdhitung_Click()

txttotal = Val(txtn1) + Val(txtn2)

End Sub

Private Sub cmdkeluar_Click()

Unload Me

.