Tugas 1.5 Membuat Kalkulator menggunakan Visual Basic 6.0 ( Dengan klik tombol hitung dan menggunakan keypress / KeyAscii )
Private Sub Batal_Click()
Txtn1.SetFocus
Txtn1 = ""
Txtn2 = ""
Txtn4 = ""
Txtn5 = ""
Txtn7 = ""
Txtn8 = ""
Txtn10 = ""
Txtn11 = ""
Txthasil = ""
Txtjumlah = ""
Txtkurang = ""
Gambar. Runtime Aplikasi Kalkulator VB 6.0
Berikut merupakan source code dari kalkulator :
Private Sub Batal_Click()
Txtn1.SetFocus
Txtn1 = ""
Txtn2 = ""
Txtn4 = ""
Txtn5 = ""
Txtn7 = ""
Txtn8 = ""
Txtn10 = ""
Txtn11 = ""
Txthasil = ""
Txtjumlah = ""
Txtkurang = ""