(24)在窗体上画一个名为Command1德命令按钮,然后编写下列程序: Option Base 1 Private Sub Command1_Click() Dim Arr Arr=Array(1,2,3,4,5) j=1 For i=5 To 1 Step -1 S=S+Arr(i)*j j=j*10 Next Print S End Sub 程序运行后,单击命令按钮,输出结果是 A.54321 B.123 C.12345 D.345

题目

(24)在窗体上画一个名为Command1德命令按钮,然后编写下列程序: Option Base 1 Private Sub Command1_Click() Dim Arr Arr=Array(1,2,3,4,5) j=1 For i=5 To 1 Step -1 S=S+Arr(i)*j j=j*10 Next Print S End Sub 程序运行后,单击命令按钮,输出结果是 A.54321 B.123 C.12345 D.345


相似考题
更多“(24)在窗体上画一个名为Command1德命令按钮,然后编写下列程序: Option Base 1 Private Sub Comma ”相关问题
  • 第1题:

    在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:

    程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。

    A.

    B.H

    C.

    D.


    正确答案:A
    【解析】分析程序,程序开始循环时i=1,j=1to1,PrintSUing(i,“Hello”)语句输出一个H,然后执行Print进行换行;当i=2时,j=1to2,PrintString(i,“Hello”)语句输出两行分别为两个HH,然后执行Print换行:当i=3时,退出循环。

  • 第2题:

    在窗体上画一个名为Command1的命令按钮,编写如下程序:

    程序运行后,单击命令按钮,输出的结果是_________。


    正确答案:
    4
    【解析】本题考查了数组的嵌套使用。程序首先通过一个For循环给数组M的各个数组元素赋值,然后通过数组下标嵌套本身。注意:这样的嵌套时,要保证数组下标不出界,否则程序将出错。

  • 第3题:

    在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For n=1 To 20 If n Mod 3<>Then m=m+n\3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是 ______。

    A.15

    B.18

    C.21

    D.24


    正确答案:C
    解析:本题考查的是For...Next循环语句。For...Next循环执行时,先将初始值赋给循环变量,判断是否超过终值,若未超过则执行循环体,遇到Next语句后,循环变量增加一个步长(默认值为1),再判断是否超过终值,若未超过则继续执行循环体,如此重复直到循环变量超过终值,退出循环。本题中的循环变量为n,步长为1,当n=20时,再执行Nextn,则n=21,此时n大于终值20,退出循环。

  • 第4题:

    在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Privme Sub Command1_Click( ) a$="VisualBasic" Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是

    A.VVV

    B.Vis

    C.sic

    D.11


    正确答案:A
    解析:String返回n个字符。如果为字符串,则返回n个字符串的首字符。返回3个"VisualBasic”的首字母“V”。

  • 第5题:

    在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:

    Private Sub Command1_Click()

    a = 12345

    Print Format$(a, "000.00")

    End Sub

    程序运行后,单击命令按钮,窗体上显示的是( )。

    A.123.45

    B.12345.00

    C.12345

    D.00123.45


    正确答案:B