Rumus
Private Sub cmdhitung_Click()
txt2 = Val(txt1.Text) * 0.1
txt3 = Val(txt1.Text) – Val(txt2.Text)
End Sub
Private Sub cmdquit_Click()
Unload Me
End Sub
Private Sub cmdulangi_Click()
txt1.SetFocus
txt1 = “”
txt2 = “”
txt3 = “”
End Sub
🙂 thank you 🙂