选择题 37.  在窗体上画一个按钮Command1，编写如下代码：
    Option Base 1
    Prirate Sub Command1_Click()
    Dim a
    a=Array(1,2,3,4)
    j=1
    For i=4 To Step -1
    s=s+a(i) *j
    j=j*10
    Next i
    Print s
    End Sub
    运行程序后，最后的输出结果为______。
【正确答案】 A
【答案解析】 Array(arglist)函数用于将arglist参数中一组用逗号隔开的值列转换成一个数组并赋值给某数组变量。在本题中，a(1)=1，a(2)=2，a(3)=3，a(4)=4；第一次For循环后：s=0+a(4)*1=4，j=1*10=10；第二次For循环后：s=4+a(3)*10=34，j=10*10=100；第三次For循环后：s=34+a(2)*100=234，j=100*10=1000；第四次For循环后：s=234+a(1)*1000=1234。所以答案为A选项。