|
Hallöchen =)
Ich arbeite grade an einem Taschenrechner. Dieser soll eine Zinsrechnung, "dokumentieren". Sprich, ich trage meine Werte ein. Die Werte werden mit Hilfe einer Schleife ausgerechnet. Die Ergebnise sind auch richtig, allerdings soll rechts im Fenster das jeweilige Zwischen Ergebnis stehen.
Also: Jahr 1 : [Zwischen Ergebnis]
Jahr 2: [Zwischen Ergbnis 2 ] usw.
Die JahresAngaben werden bei mir anhand einem Eingabe Feld "bestimmt".
So sieht der Code zum Rechnen aus:
Public cmdRechner_Click()
Dim iStart As Double
Dim ime As Double
Dim iZip As Double
Dim iLaufJahr As Double
Dim ierg As Double
Dim i As Integer
Dim iGesamt As Double
iStart = tbStart.Text 'StartKapital
ime = tbme.Text 'Monatliche Entzahlung
iZip = tbZip.Text 'Zinsen in %
iLaufJahr = tbLaufJahr.Text 'Laufzeit in Jahrne
iGesamt = iStart
For i = 1 To iLaufJahr
iGesamt = iGesamt - 12 * ime
iGesamt = iGesamt + iGesamt * (iZip / 100)
Next i
ierg = iGesamt
lblZwischenergebnisse = ierg
Die Ergebnise die insgesamt rauskommen sind richtig, aber wie komme ich an die zwischen Ergebnisse?
|