Tugas 3 Penjumlahan Tidak Menggunakan Keypress
1
Source kode :
Private Sub cmdhitung_Click()
txttotal = Val(txtnilai1) + (txtnilai2)
End Sub
Private Sub cmdkeluar_Click()
Unload Me
End Sub
Private Sub cmdlagi_Click()
txtnilai1 = ""
txtnilai2 = ""
txttotal = ""
txtnilai1.SetFocus
End Sub
Tidak ada komentar:
Posting Komentar