TUGAS BAHASA PEMROGRAMAN 1.3


TUGAS 1.3

Private Sub CMDHITUNG_Click()
TXTJML = Val(TXTN1) + Val(TXTN2) + Val(TXTN3) + Val(TXTN4)
End Sub

Private Sub CMDLAGI_Click()
TXTN1 = ""
TXTN2 = ""
TXTN3 = ""
TXTN4 = ""
TXTJML = ""
TXTN1.SetFocus

End Sub

Private Sub CMDKELUAR_Click()
Unload Me
End Sub



Share this

Related Posts

Previous
Next Post »

:)
:(
hihi
:-)
:D
=D
:-d
;(
;-(
@-)
:P
:o
:>)
(o)
:p
:-?
(p)
:-s
(m)
8-)
:-t
:-b
b-(
:-#
=p~
$-)
(y)
(f)
x-)
(k)
(h)
cheer