单项选择题

下列程序段的执行结果为 ______。
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 To 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(ByVal 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键和鼠标右键
相关试题
  • 以上程序段运行的结果是:______. ...