Question

一道VB题急求答案求输出的是什么

Private Sub Form_Click()
Dim A(4) As Integer, n As Integer
n = 3
A(1) = 1
For k = 0 To n - 1
For j = 1 To k + 1
x = k + 1
A(x) = A(x) + A(x - 1)
If k < n - 1 Then Exit For
Print A(x);
If j = k + 1 Then Print
Next j
Print k
Next k
End Sub
输出的是什么，为什么输出这个

Answer 1

输出如图

追问

为什么输出的是这个。。。

追答

vb说是这个。。。。。

追问

这我也知道，我只想知道为什么。。。

追答

如果你不介意的话，你可以拿笔拿纸出来，一个一个地算。
当k=0 j=1时，x=0+1 ,a(1)=a(1)+a(1-1),如果0<3-1 成立，退出第二个循环，否则打印a(x)的值在窗体上。。。。。。。。。。。。。。。。。。。。。

Answer 2

结果是3和2