求救VB高手！！！！！！ 需要做一个字母塔！！！！

类似：
A
A B A
A B C B A
A B C D C B A
A B C D E D C B A
A B C D E F E D C B A
............................
以此类推
高手快来啊！
紧急！！用VB的。。

不是像那样的
是像杨辉三角那样的格式
我本来打的是那样 但是出来就是这样了

Dim i As Integer
Dim n As Integer
Dim s As String
For i = 0 To 5
s = ""
For n = 0 To i
s = s & Chr(65 + n)
Next n
For n = 0 To i - 1
s = s & Chr(64 + i - n)
Next n
Print Space(6 - i) & s
Next i

Private Sub Form_Click() Dim a(1 To 9, 1 To 9) As Integer For i = 1 To 9 a(i, 1) = 1 a(i, i) = 1 Next i For i = 3 To 9 For j = 2 To i - 1 a(i, j) = a(i - 1, j) + a(i - 1, j - 1) Next j Next i For i = 1 To 9 For j = 1 To i Print Tab(20 - 2 * i + 4 * j); Chr(a(i, j) + 64); Next j Print Next i End Sub

text1.text 输入层数 private sub command1_click() aaa = val(text1.text) for i = 0 to aaa print space(abs(aaa - i) * 2); for j = -i to i print chr(65 + (i - abs(j))); next j print next i end sub

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息