Как вывести последние 3 буквы из первой строки и первые 3 буквы из второй строки 10 раз - VB

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

Помогите пожалуйста, составить программу с действиями 1. Вводим любое слово в первую строку 2. Вводим любое слово во вторую строку 3. Нажимаем на кнопку 4. Снизу в поле выводяться последние 3 буквы из первой строки и первые 3 буквы из второй строки 10 раз

Решение задачи: «Как вывести последние 3 буквы из первой строки и первые 3 буквы из второй строки 10 раз»

textual
                            Листинг программы 
                        

                            Private Sub Command1_Click()
        b1$ = Right$(Me.Text1.Text, 3)
        e1$ = Left$(Me.Text2.Text, 3)
        w$ = b1$ & e1$
        Me.List1.Clear
        For i% = 1 To 10
            Me.List1.AddItem w$
        Next i%
End Sub
                        