毎月の預金と利息を計算するVBプログラム

Question

預金と月々加算される利息の金額を正確に計算する電卓を作る際に問題があります。私はどのように総預金に毎月の預金を追加することができますループを組み込み、総預金合計金利/総預金金利/ 100/12を加えて追加します。ここまで私がこれまで持っていたことがあります。申し訳ありませんが、VBにスーパー新しいです！

Dim intMonthlyDeposit As Interger 
    Dim intMonthsTotal As Integer 
    Dim intAnnualRate As Interget 
    Dim decTotalDeposits As Decimal 
    Dim decTotalInterest As Decimal 
    Dim decTotalTotal As Decimal 

    Try 
     intMonthlyDeposit = CInt(txtMonthlyDeposits.Text) 
     intMonthsTotal = CInt(txtMonths.Text) 
     decAnnualRate = CDec(txtAnnualRate.Text) 
     decTotalDeposits = 0 
     decTotalInterest = 0 
     decTotalTotal = 0 

     decTotalDeposits = decMonthlyDeposit * intMonthsTotal 

     decTotalInterest = decTotalDeposits * (decAnnualRate/100) 

     decTotalTotal = decTotalDeposits + decTotalInterest 

     lblTotDeposit.Text = decTotalDeposits.ToString("C") 

     lblTot.Text = decTotalTotal.ToString("C") 

     lblTotInterest.Text = decTotalInterest.ToString("C") 


    Catch ex As Exception 
     MsgBox("Enter a Valid Number") 

    End Try 


End Sub 

Answer 1

これは、私が合計金利と総預金を正しく計算するためのループを実装した方法です。インデックスについては

整数= 1 intMonthsTotalステップに1 decTotalDeposits + = decMonthlyDeposit decTotalInterest + =（decTotalDeposits + decTotalInterest）*（（decAnnualRate/100）/ 12）