在窗体上面一个命令按钮(其Name属性为Command1),然后编写如下代码: Option Base 1 Private Sub Coramandl_Click() Dim a s=0 a=Array(1,2,3

admin2010-09-11  30

问题 在窗体上面一个命令按钮(其Name属性为Command1),然后编写如下代码:    Option Base 1    Private Sub Coramandl_Click()      Dim a      s=0      a=Array(1,2,3,4)      j=1      For i=4 To 1 Step-1        s=s+a(i)*j        j=j*10      Next i      Print s    End Sub    运行上面的程序,单击命令按钮,其输出结果是______。

选项 A、4221
B、1234
C、34
D、12

答案B

解析 数组名a为变体型变量,用Array函数对其进行初始化,得到a(1)=1、a(2)=2、a(3)=3和a(4)=4。变量j在循环中每次计算后扩大10倍,变量s的计算过程为s=4×1+3×10+2×100+1×1000=1234。
转载请注明原文地址:https://kaotiyun.com/show/ftmp777K
0

最新回复(0)