Private Sub Command1_Click()
Text3 = Val(Text1) + Val(Text2)
End Sub
Private Sub Command2_Click()
Text1 = ""
Text2 = ""
Text3 = ""
Text1.SetFocus
End Sub
Private Sub Command3_Click()
Unload Me
End Sub
Langganan:
Posting Komentar (Atom)
-
Jakarta - Sejak Agustus kemarin, Kementerian Komunikasi dan Informatika (Kominfo) telah melakukan pengadaan barang dan jasa untuk filter at...
Tidak ada komentar:
Posting Komentar