This preview shows page 1. Sign up to view the full content.
Unformatted text preview: ) End If payment = ( CSng (txtAL.Text) * ( CSng (txtIR.Text)) / 100) / (1 - (1 + ( CSng (txtIR.Text)) / 100) ^ ( CSng (-txtDM.Text))) TI = CSng (txtDM.Text) * (payment - CSng (txtAL.Text)) txtMP.Text = payment txtTIP.Text = TI End Sub End Class...
View Full Document
This note was uploaded on 08/18/2011 for the course IE 148 taught by Professor Davesly during the Spring '11 term at Iowa State.
- Spring '11
- Industrial Engineering