Question

求VB题目 ，求第一行和最后一行的结果

Private Sub Form_Click()
DimA(5) As Integer
For I=1 To 5
A(I)=I
Next I
Call F1(A)
For I =1 To 5
Print A(I)
Next I
End Sub
Private Sub F1(S() As Integer)
For I=1 To 5
If S(I) < 8 Then
For I= 1 To 5
S(J)=S(J)+J
Next J
Call F1(S)
End If
Next I
End Sub
求第一行和最后一行的结果

Answer 1

放到vb中 代码有问题，两个for 都用i

追问

我也发现了，又检查了一遍发现第四个for是For J = 1 To 5
请问您能帮我解释一下这种代码怎么理解吗？