Hej igen!

Jag har en fråga som jag hoppas att någon av er skulle kunna hjälpa mig med.

Saken är den att jag håller på att göra en applikation som räknar ut amorteringar. I en textbox skriver de in tiden som de vi avbetala på och i en annan hur många gånger per år som de vill betala. Dessa multipliseras och blir variablen d.

Nu till min fråga:
Hur gör jag för att få fram varje betalningstillfälle i min listbox?

Jag hoppas att ni förstå vad jag menar, om inte fråga......

MVH
Cerrolyn :-)

Saken är den att jag håller på att göra en applikation som räknar ut amorteringar. I en textbox skriver de in tiden som de vi avbetala på och i en annan hur många gånger per år som de vill betala. Dessa multipliseras och blir variablen d.

Du använder funktionen dateadd:

dim manadsIntervall as integer
manadsIntervall = 12 \ ggrPerAr

for tillfalle = 1 to tid
list1.additem DateAdd("m", manadsIntervall * tillfalle, now)
next

DateAdd
The DataAdd syntax has these parts:

Part Description
==============
interval Required. String expression that is the interval you want to add. See Settings section for values.

number Required. Numeric expression that is the number of interval you want to add. The numeric expression can either be positive, for dates in the future, or negative, for dates in the past.

date Required. Variant or literal representing the date to which interval is added.


Settings
The interval argument can have the following values:

Setting Description
yyyy Year
q Quarter
m Month
y Day of year
d Day
w Weekday
ww Week of year
h Hour
m Minute
s Second