PROGRAM 3 PENJUMLAHAN MENGGUNAKAN MANUAL (KLIK)



PROGRAM 3 MENGGUNAKAN MANUAL
Private Sub Cmdhitung_Click()
txtjumlah = Val(txtn1) + Val(txtn2) + Val(txtn3)
End Sub

Private Sub Cmdbatal_Click()
txtn1 = ""
txtn2 = ""
txtn3 = ""
txtn1.SetFocus
End Sub
Private Sub Cmdkeluar_Click()
Unload Me
End Sub
Private Sub Cmdlagi_Click()
txtn1 = ""
txtn2 = ""
txtn3 = ""
txtn1.SetFocus
End Sub

Komentar

Postingan populer dari blog ini

Tutorial

Teknologi Yang Akan Menjadi Tren Di Tahun 2017

STMIK PRINGSEWU GELAR UPACARA HARI SUMPAH PEMUDA YANG KE 89 BERSAMA MENWA, BEM SERTA MAHASISWA