单项选择题

下列程序段的执行结果为______。
Dim m(3,3)As Integer
Dim i As Integer
Dim j As Integer
Dim x As Integer
For i=1 To 3
m(i,i)=i
Next
For i=0 T0 3
For j=0 To 3
x=x+m(i, j)
Next
Next
Print x

A．3
B．4
C．5
D．6

<上一题目录下一题>

热门试题

单项选择题

在窗体上画一个命令按钮，其名称为Command1，然后编写如下程序： Function Func(By Val x As Integer, Y As Integer) y=x*y If y＞0 Then Func=x Else Func=y End If End Function Private Sub Command1_Click() Dim a As Integer, b As Integer a=3 b=4 c=Func(a, B) Print a= ; a Print b= ; b Print c= ; c End Sub 程序运行后，单击命令按钮，其输出结果为______。

A．a=3 b=12 c=3
B．a=3 b=4 c=3
C．a=3 b=4 c=12
D．a=13 b=12 c=12

单项选择题

编写如下事件过程： Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Shift=6 And Button=2 then Print BBBB End If End Sub 程序运行后，为了在窗体上输出“BBBB”，应执行的操作为______。

A．同时按下Shift键和鼠标左键
B．同时按下Shift键和鼠标右键
C．同时按下Ctrl、Alt键和鼠标左键
D．同时按下Ctrl、Alt键和鼠标右键

相关试题