Tugas VB.1.1

Private sub CmdHITUNG_Click ()
TxtB.Text=val (txtA.Text)*0.1
TxtC.Text=val (txt.Text)-val (txtB.Text)

End sub

Private Sub CmdULANGI_Click ()
TxtA=""
TxtB=""
TxtC=""

End sub

Private Sub CmdQUIT_Click ()
End
End  Sub