在窗体上画一个命令按钮,然后编写如下事件过程。 Private Sub Commandl Click( ) Dima0a=Array(1,3,5,7)s=0Fori——1t0 3S=s*10+a(i)NextiPrint sEndSub程序运行后,输出结果为( )。A.135B.357C.53lD.753

题目

在窗体上画一个命令按钮,然后编写如下事件过程。 Private Sub Commandl Click( ) Dima0a=Array(1,3,5,7)s=0Fori——1t0 3S=s*10+a(i)NextiPrint sEndSub程序运行后,输出结果为( )。

A.135

B.357

C.53l

D.753


相似考题
更多“在窗体上画一个命令按钮,然后编写如下事件过程。 Private Sub Commandl Click( ) Dima0a=Array(1 ”相关问题
  • 第1题:

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

    A.VVV

    B.Vis

    C.sic

    D.11


    正确答案:A
    解析:本题考查字符串函数。 String返回n个字符。如果为字符串,则返回n个字符串的首字符。据此,本题的正确答案为A,即返回3个“Visual Basic”的首字母“V”。

  • 第2题:

    在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Pfivate Sub Commandl_Click() Dima() a=Array("机床","车床","钻床","轴承")Print a(2)EndSub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。

    A.机床

    B.车床

    C.钻床

    D.轴承


    正确答案:C
    C.【解析】本题考查VBA中数组的知识。数组变量由变量名和数组下标构成,通常使用Dim语句来定义数组,其中下标下限默认为0。本题中的a(2)就是数组的第三个元素即“钻床”。

  • 第3题:

    在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程. Option Base 0 Private Sub Command1_Click Dim city As Variant city=Array(“北京”,“上海”,“天津”,“重庆”) Print city(1) End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是

    A.空白

    B.错误提示

    C.北京

    D.上海


    正确答案:D
    解析:本题主要考查数组的初始赋值。由于有“OptionBase0”,所以以Array函数赋值的数组下标下界为0。所以city(1)指Array赋给city的第二个元素,即“上海”,故本题选D。

  • 第4题:

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

    A.15

    B.18

    C.21

    D.24


    正确答案:C
    解析:本题考查For循环控制语句,做好此题的关键是掌握For循环语句的执行过程。For循环首先把“初值”赋给循环变量,接着检查循环变量的值是否超过终值,如果超过就停止执行循环体,跳出循环,执行Next后面的语句;否则执行一次循环体,然后把“循环变量+步长”的值赋给循环变量,重复上述过程。据此,如果For循环的终值等于初值,For循环也会执行一次循环。本题需要输出执行完Forn循环后n值,应为21。根据前述,当执行完n=20的循环时,n被赋值21,然后再取检验它是否超过了终值。故正确答案为C。

  • 第5题:

    在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Private Sub Commandl_Click() Dim() a=Array(”机床”,”车床”,”钻床”,”轴承”)Printa(2)EndSub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。

    A.机床

    B.车床

    C.钻床

    D.轴承


    正确答案:C
    暂无解析,请参考用户分享笔记