Tugas 2.2

Private Sub cmdhitung_Click()
txtB.Text = Val(txtA.Text) * 0.1
txtC.Text = Val(txtA.Text) - Val(txtB.Text)

End Sub


Private Sub cmdquit_Click()
End
End Sub

Private Sub cmdulangi_Click()
txtA = ""
txtB = ""
txtC = ""

End Sub