在窗体上画一个命令按钮,然后编写如下事件过程: Option Base 1 Private Sub Command1 Click() Dim a a=Array(1, 2, 3, 4) j

admin2009-02-13  38

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

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

答案8

解析 函数Array给数组a赋初值,结果为其元素值和下标一样。变量s的计算过程为:s =0、4、34、234、1234,最后输出1234。变量 j的计算过程为:j=1、10、100、1000、10000。
转载请注明原文地址:https://jikaoti.com/ti/cqq0FFFM
0

最新回复(0)