by Muhammed Yousuf Arain (3 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Wed 16th July 2003
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Loan Calculator
Dim payment As Single
payment = Pmt(0.01 * irate.Text / 12, duration.Text, amount.Text, 0, payearly.Value)
txtpmt.Text = Format$(payment, "#.00")
End Sub
Private Sub Command2_Click()
End
End Sub
Private Sub Command3_Click()
amount.Text = Clear
duration = Clear
irate.Text = Clear
txtpmt.Text = Clear
End Sub