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又出现一个对的，
哪里错了，怎么改？求高人指点