Решение задачи через циклы - Visual Basic .NET

Формулировка задачи:

Задача которая должна выполняться через циклы. Составить программу определения суммы вклада на сберегательной книжке через 5 лет, если начальная сумма вклада 25000 рублей, а годовой процент составляет 11 процентов. Вывести сумму за каждый год отдельно. ----------------------------------- Я решил так:

  Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        Dim a, b, c, d, sum As Integer
        a = 25000 * 0.11 + 25000
        TextBox6.Text = a
        b = a * 0.11 + a
        TextBox7.Text = b
        c = b * 0.11 + b
        TextBox8.Text = c
        d = c * 0.11 + c
        TextBox9.Text = d
        sum = d * 0.11 + d
        TextBox10.Text = sum
    End Sub

Но надо через циклы.

Решение задачи: «Решение задачи через циклы»

textual
                            Листинг программы 
                        
                                    Dim tbs() = {TextBox6, TextBox7, TextBox8, TextBox9, TextBox10}
        Array.ForEach(tbs, Sub(tb) tb.Text = 25000 * 1.11 ^ (Array.IndexOf(tbs, tb) + 1))