Question

用VB编写程序输出一个9行的“杨辉三角形”，求具体代码，急！！

用VB编写程序输出一个9行的“杨辉三角形”，求具体代码，要VB2008版的，不要2010版的

Answer 1

输出9行的“杨辉三角形”代码：

Private Sub Command1_Click()
Dim a(20) As Integer
a(1) = 1
For i = 1 To 9
Print Spc(20 - 2 * i);
For j = i To 1 Step -1
a(j) = a(j - 1) + a(j)
Print Format(a(j), "@@@@");
Next j
Print
Next i
End Sub