maths

[chris]

I trying to do a math function which splits it self up eg Mortgage quotation
The deatils are entered on form1 and the results are showen in a list viw
on form 2

The customer wants to borrow £55000 over a 25 year period how do i get it
to show the results for each year in a listview box for example

Year1 55000,Interest Paid£2477, Monthly Payment £292.30 Capital £1030.95
Year2 48969,Interest Paid£2477, Monthly Payment £292.30 Capital £1083.70

And so on till it finished on 25 years

I Hope some one can help

[marc]

ListView1.ColumnHeaders.Add (1), , "Year"
ListView1.ColumnHeaders.Add (2), , "Interest Paid"
ListView1.ColumnHeaders.Add (3), , "Monthly Payment"
ListView1.ColumnHeaders.Add (1), , "Capital"

ListView1.ListItems.Clear

For lngloop = 25 To 1 Step -1
ListView1.ListItems.Add 1, , lngloop
ListView1.ListItems.Add 2, , "Interest"
ListView1.ListItems.Add 3, , "Payment"
ListView1.ListItems.Add 4, , "Capital"
Next


This code assumes you have not setup the listview at design time, if you
have ignore the top 4 lines.

To change the spacing you can use the SendMessageA API call in the user32
library. I have not use this in a while (pretty sure it is correct) and
the code I used it in is at my last job, otherwise I would have provided
a sample.

Marc

"chris" <chris@aipgroup.com> wrote:
>
>I trying to do a math function which splits it self up eg Mortgage quotation
> The deatils are entered on form1 and the results are showen in a list viw
>on form 2
>
>The customer wants to borrow £55000 over a 25 year period how do i get it
>to show the results for each year in a listview box for example
>
>Year1 55000,Interest Paid£2477, Monthly Payment £292.30 Capital £1030.95
>Year2 48969,Interest Paid£2477, Monthly Payment £292.30 Capital £1083.70
>
>And so on till it finished on 25 years
>
>I Hope some one can help