单项选择题
在窗体上添加一命令按纽,其名为Command1,然后编写代码如下:
Private Sub Command1_Click()
Dim arr (5)As Integer
Dim arrl (5)As Integer
n=3
For i=1 To 5
Arr (i)=i
Arrl (n)=2*n+ i
Next i
Print arrl (n);arr (n)
End Sub
程序的运行结果为:______。
A.3 11
B.11 3
C.13 3
D.3 13
点击查看答案
<上一题
目录
下一题>
热门
试题
单项选择题
有如下函数过程: Function gys(ByVal x As Integer,ByVal y As Integer) As Integer Do While y<>0 reminder = x Mod y x=y y=reminder Loop gys=x End Function以下是调用该函数的事件过程,该程序的运行结果是______。 Private Sub Command7_Click() Dim s As Integer Dim b As Integer a=100 b=25 x=gys(a,b) Print x End Sub
A.0
B.25
C.50
D.100
点击查看答案
单项选择题
在窗体上添加一个按纽,名为command1,然后编写如下的事件过程:______。 Private Sub Command1_Click() For i=1 To 4 x= 4 For j=1 To 3 x= 3 For k=1 To 2 x=x + 5 Next k Next j Next i Print x End Sub
A.13
B.26
C.30
D.40
点击查看答案
相关试题
单击命令按钮时,下列程序代码的执行结果为...
有如下一个Sub过程: Sub mlt (ParamAr...