问题 填空题

执行下面程序,单击Commandl,则图片框中显示的第一行是(),显示的第二行是() ,最后一行显示的是 () 。

Private Sub Command1_Click()

Dim a(3,3)As Integer

Dim i As Integer,j As Integer

For i=1 To 3

For j=3 To 1 Step -1

If i>=j Then

a(i,j)=i-j

Else

a(i,j)=j-i

End If

Next j

Next i

For i=1 to 3

For j=3 To 1 Step -1

Picture1.Print a(i,j);

Next j

Picturel.Print

Next i

EndSub

答案

参考答案:

2 1 0;1 0 1;0 1 2

多项选择题
单项选择题