vb有关问题 用单循环显示如下图形

vb问题 用单循环显示如下图形

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        For i = 1 To 9
            Label1.Text &= Space(i - 1)
            Label1.Text &= StrDup(18 - 2 * i, Chr(64 + i))
            Label1.Text &= vbCrLf
        Next
    End Sub
我编的运行出来上边是那样，再一按button又出现一个对的，
哪里错了，怎么改？求高人指点