用vb编写程序，输出一个9行的杨辉三角形，形状 金字塔形，有在线的教一下吧，我已被绕晕

VB输出
Private Sub Form_click()
n = Val(Text1.Text)
ReDim a(n + 1, n + 1), b(n + 1, n + 1)
Cls
k = 8
For i = 1 To n
Print String((n - i) * k / 2 + 1,"");
For j = 1 To i
a(i, 1) = 1
a(i, i) = 1
a(i + 1, j + 1) = a(i, j) + a(i, j + 1)
b(i, j) = Trim(Str(a(i, j)))
Print b(i, j); String(k - Len(b(i, j)),"");
Next j
Print
Next i
End Sub
创建一个text和command，在text中输入所需行数，点击command即可。一个数在杨辉三角出现的次数　由1开始，正整数在杨辉三角形出现的次数为∞：1, 2, 2, 2, 3, 2, 2, 2, 4, 2, 2, 2, 2, 4, ... （OEIS:A003016）。最小而又大于1的数在贾宪三角形至少出现n次的数为2, 3, 6, 10, 120, 120, 3003, 3003, ... （OEIS:A062527）

学会变通！

这种练习题还是做控制台的吧

问题已解决，谢谢啦！