Tugas 2.2
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
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

Komentar
Posting Komentar