在窗体上画一个按钮Command1,编写如下代码: Option Base 1 Private Sub Command1 Click() Dim a a=Atray(1,2,3,4) j=1 For i=4

admin2013-01-07  37

问题 在窗体上画一个按钮Command1,编写如下代码:
    Option Base 1
    Private Sub Command1 Click()
    Dim a
    a=Atray(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、1234
B、12
C、34
D、4321

答案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=2344+a(1)*1000-1234。所以答案为A选项。
转载请注明原文地址:https://jikaoti.com/ti/odw0FFFM
0

最新回复(0)