Minggu, 02 Desember 2018

Tugas 2.VB


Private Sub CmdHITUNG_Click ()
TxtB=val (txtA)*0.1
TxtC=val (txtA)-val (txtB)

End Sub


Private SubCmdULANGI_Click()
TxtA=""
TxtB=""
TxtC=""

End Sub

Tidak ada komentar:

Posting Komentar