单项选择题

下列程序段的执行结果为( )。
Dim A(3,3)
For M=1 To 3
For N=1 To 3
If N=M Or N=3-M+1 Then
A(M,N)=1
Else
A(M,N)=0
End If
Next N
Next M
For M=1 To 3
For N=1 To 3
Print A(M,N)
Next N
Print
Next M

A．1 0 0
0 1 0
0 0 1
B．1 1 1
1 1 1
1 1 1
C．0 0 0
0 0 0
0 0 0
D．1 0 1
0 1 0
1 0 1
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画两个文本框Text1和Text2，一个命令按钮Command1，请阅读以下程序段： Private Sub Command1_Click() x=0 Do Until x＞=50 x=(x+4)*(x+3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x) End Sub 运行程序后，单击命令按钮，在两个文本框中显示的值分别为( )。
A．1和0
B．2和240
C．3和50
D．4和168
单项选择题
在窗体上画一个名称为“Command1”、标题为“计算”的命令按钮，再画7个标签，其中5个标签组成名称为Label1的控件数组；名称为Label2的标签用于显示计算结果，其Caption属性的初始值为空；标签Label3的标题为“计算结果”。运行程序时会自动生成5个随机数，分别显示在标签控件数组的各个标签中。单击“计算”按钮，则将标签数组各元素的值累加，然后计算结果显示在Label2。以下为“计算”按钮的事件过程，请为空白处选择合适的语句 ( )。 Private Sub Command1_Click() Sum=0 For i=0 To 4 Sum=Sum+______ Next ______=Sum End Sub
相关试题