填空题
执行下面程序,单击命令按钮Command1后,a(2,3)的值为 1(1) 2,a(3,4)的值为 3(2) 4,a(5,4)的值为 5(3) 6。
Option Explicit
Private Sub Commandl_Click7
Dim a(5,5)As Integer,i As Integer,j As Integer
For i=1 TO 5
For j=1 To 5
If i=1 Or j=1 Then
a(i,j)=1
Else
a(i,j)=a(i-1,j)+a(i,j-1)
End If
Print a(i,j);
Next j
Print
Next i
EndSub