itgle.com

单选题在窗体上画一个命令按钮,然后编写如下事件过程:程序运行后,单击命令按钮,输出结果是(  )。A ABCDEB 1 2 3 4 5C abcdeD 出错信息

题目
单选题
在窗体上画一个命令按钮,然后编写如下事件过程:程序运行后,单击命令按钮,输出结果是(  )。
A

ABCDE

B

1 2 3 4 5

C

abcde

D

出错信息


相似考题
更多“单选题在窗体上画一个命令按钮,然后编写如下事件过程:程序运行后,单击命令按钮,输出结果是(  )。A ABCDEB 1 2 3 4 5C abcdeD 出错信息”相关问题
  • 第1题:

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

    Private Sub Command1_Click()

    Dim a(5) As String

    For i = 1 To 5

    a(i) = Chr(Asc("A") + (i - 1))

    Next i

    For Each b In a

    Print b;

    Next

    End Sub

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

    A.ABCDE

    B.1 2 3 4 5

    C.abcde

    D.出错信息


    正确答案:A

  • 第2题:

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

    Private Sub Command1_Click()

    a=0

    For i=1 To 3

    For j=1 To 4

    If j Mod 2<>0 Then

    a=a+1

    End If

    a=a+1

    Next j

    Next i

    Print a

    End Sub

    程序执行后,单击命令按钮,输出结果是【 】。


    正确答案:18
    18 解析:对于内层循环而言,当j为1、3时,a会各加两次1;当j为2、4时,a会各加一次1。因此整个内层会加6次1。考虑到外层循环要执行三次循环体,所以一共要加18次1,最终的输出结果为18。

  • 第3题:

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

    程序运行后,单击命令按钮,其输出结果为__________。


    正确答案:
    9【解析】本题考查VBA中程序设计的知识。对于这个问题,首先注意到循环的次数为6次;然后注意到循环内的两个If语句为顺序关系而不是嵌套关系,第一个If语句只有第一次循环时才会满足;第一次循环时首先执行第一个If语句把x赋值为1,然后执行第二个If语句;以后各次循环均照此分析,前4次循环x自加l,后两次循环X自加2,最后输出结果为9。

  • 第4题:

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

    运行后的输出结果是______。

    A.5

    B.1

    C.2

    D.6


    正确答案:B
    解析:“IIf(条件,表达式1,表达式2)”根据“条件”返回“表达式”或“表达式2”的值。

  • 第5题:

    在窗体上有一个命令按钮,然后编写如下事件过程: Private Sub Command1Click( ) Dim a(5)As String For i=1,To 5 a(i)=Chr(Asc("A")+(i-1)) Next i For Each b In a Print b; Next End Sub 程序运行后,单击命令按钮,输出结果是( )。

    A.ABCDE

    B.1 2 3 4 5

    C.abcde

    D.出错信息


    正确答案:A
    A。【解析】Asc(字符)将字符转换为其ASCII码值,Chr(数字)将数字转换为ASCII相对应的字符。本程序首先定义一维字符串数组a(5),然后将字符“A”的ASCII码值分别加上0、1、2、3、4,转换为字符串存入a(5)。其值为ABCDE。

  • 第6题:

    在窗体中添加一个名称为Commandl的命令按钮,然后编写如下事件代码:窗体打开运行后,单击命令按钮,则消息框的输出结果是( )。

    A. 1

    B. 2

    C. 3

    D. 4


    正确答案:D
    本题考查VBA中选择结构的知识。在本题中用了多个If分支结构,这些结构是顺序的而不是嵌套的,所以会顺序执行,判断是否满足条件。首先75不小于60,所以不执行x=1;然后再判断75不小于70,所以不执行x=2;再接着判断75小于80,所以执行x=3:最后判断75小于90,所以执行x=4。最后消息框里输出的X值为4。

  • 第7题:

    在窗体上画一个名为Commandl的命令按钮,编写如下程序:程序运行后,单击命令按钮,输出的结果是( )。

    A. 4

    B. 5

    C. 6

    D. 8


    正确答案:A
    A)    【解析】本题考查数组中元素的分析。数组中的第k个元素的值为12-k,因此M(6)数据为6,M(8)为4。

  • 第8题:

    在窗体上画一个命令按钮。然后编写如下事件过程:

    程序运行后,连续单击三次命令按钮,输出的结果是

    A.7 36

    B.15 72

    C.1 5 108

    D.72 256


    正确答案:C
    因为X重新赋值,所以每次循环结果一样。计算一次即可,结果为l5。对于y,内层循环一次,其值为3。共循环12次,所以其值为36。当多次单击命令按钮时,x是普通变量,每次单击只是重新计算一次,执行结果一样,仍然为15。但Y是静态变量,程序没有结束运行之前,仍然保持上一次的值。每单击一次按钮,它将累计本次执行结果。执行三次,结果为36+36+36=108。选择C。

  • 第9题:

    在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub CommAnd1_Click() For i=1 To 4 x=0 For j=1 To 3 x=j For k=1 To 2 x=x+6 Next k Next j Next i Print x End Sub 程序运行后,单击命令按钮,输出结果是______ 。

    A.7

    B.15

    C.157

    D.538


    正确答案:B

  • 第10题:

    在窗体上有一个命令按钮,然后编如下事件过程:

    程序运行后,单击命令按钮,在输入对话框内输入-1,输出结果是 。


    正确答案:
    -1的平方根是一个虚数
    【解析】在Sub过程中,定义了一个Double型变量N,并调用InputBox函数,给N赋值,即将从对话框中输入的-1赋给N;通过运算符”&”,将N与字符串”的平方根”连接起来并赋给Msg;在条件块语句中将N作为参数,调用SR事件过程,将Function过程的返回值作为测试表达式;在SR函数中,调用Sgn函数测试x的值为正数还是负数,如果是正数,那么就执行条件块语句中的SR=Sqr(x),即将X的平方根作为返回值,如果x值为零,Sgn函数返回值为零,那么就将0作为返回值;如果为负数。Sgn函数返回值为-1,SR=-1,即将-1作为返回值;在Sub程序的条件块语句中,根据SR返回值的不同,执行不同操作,当返回值为0,将Msg字符串加”是0”,赋给Ms9,如果是-1,将Msg加”是一个虚数”赋给Msg,当为其他时,即在平方根时,将字符串Msg加”是”,再加上这个数的平方根赋给Msg,并用MsgBox函数输出。

  • 第11题:

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

    程序运行后,依次输入3,2,1,0,-1,-2,则输出结果是__________。


    正确答案:
    -3【解析】本题考查VBA中循环的知识。对于这种循环结构,首先看条件判断在循环体的前面还是后面,如果是先判断条件,则有可能一次也不执行循环体;如果是后判断条件,则无论条件如何至少执行一次循环体。在Until循环中条件为False时执行循环体,条件为True时退出循环;在While循环中条件为True时执行循环体,条件为False时退出循环,这一点要注意区分清楚。本题是一个先判断条件的While循环,每次循环中有两次输入,共循环3次;由于在每次循环中均会重新对a、b、C进行赋值,所以只需要考虑最后一次循环就可以,在最后一次循环中c等于最后两次输入的值之和也就是-3

  • 第12题:

    单选题
    设有如下通用过程:在窗体上画一个名为Command1的命令按钮,然后编写如下的事件过程:程序运行后单击命令按钮,输出结果是(  )。
    A

    ABCDEF

    B

    abcdef

    C

    AFBECD

    D

    DEFABC


    正确答案: C
    解析:
    在循环中,利用Mid函数使得变量tStr的值不断变化,然后通过命令按钮的单击事件调用循环所在的函数,UCase函数将Fun函数返回的结果字符串中的小写字母转换成大写字母。

  • 第13题:

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

    Private Sub Command1_Click()

    For i=1 To 4

    x=4

    For j=1 To 2

    x=x+6

    Next

    Next

    Print x

    End Sub

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

    A.12

    B.13

    C.16

    D.17


    正确答案:C
    解析:观察程序,由于每次执行外层循环时x都被重新赋值,因此只要看到i=4时,执行内循环所得到的结果就可以。

  • 第14题:

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

    Private Sub Command1_Click()

    Do Whileb>=0

    c=a+b

    Loop

    End Sub

    程序运行后,依次输入3,2,1,0,-1,-2,则输出结果是( )。


    正确答案:-3
    -3 解析: 本题考查VBA中,循环的知识。对于这种循环结构,首先看条件判断在循环体的前面还是后面,如果是先判断条件,则有可能一次也不执行循环体;如果是后判断条件,则无论条件如何至少执行一次循环体。在Until循环中条件为False时执行循环体,条件为True时退出循环;在While循环中条件为True时执行循环体,条件为False时退出循环,这一点要注意区分清楚。本题是一个先判断条件的While循环,每次循环中有两次输入,共循环3次:由于在每次循环中均会重新对a、b、c进行赋值,所以只需要考虑最后一次循环就可以,在最后一次循环中c等于最后两次输入的值之和也就是-3。

  • 第15题:

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

    程序运行后,单击命令按钮,消息框输出的是系统当前日期和当前时间。


    正确答案:
    72【解析】本题考查VBA中二维数组和循环的知识。本题使用了二重循环为两个二维数组中的元素均进行了赋值,最后求两个数组元素值的积。我们只需要注意这两个数组元素在循环中被赋了什么值,当i=3,j=3时,al(3,3)=3 3=6,a2(3,3)=al(3,3) 3 3=12,所以最后二者之积为72。

  • 第16题:

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

    运行后的输出结果是______。

    A.3

    B.10

    C.20

    D.2


    正确答案:A
    解析:“If(条件,表达式1,表达式2)”根据“条件”返回表达式1或表达式2的值。

  • 第17题:

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

    Private Sub Command1_Click()

    For i=1 To 4

    x=4

    For j=1 To 3

    X=3

    For k=1 To 2

    x=x+6

    Next

    Next

    Next

    Print x

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

    A.7

    B.15

    C.157

    D.538


    正确答案:B
    解析:本题的难点在于循环体外的变量初值问题。虽然该段程序中有3重循环,但仔细观察发现,x=3将前面的内容替代了,只剩下最后的结果,即3+6+6=15。

  • 第18题:

    在窗体上画一个命令按钮,其名称为Command],然后编写如下事件过程:程序运行后,单击命令按钮,消息框输出的是( )

    A. 48

    B. 72

    C. 96

    D. 128


    正确答案:B
    奉题考查VBA中二维数组和循环的知识。本题使用了二重循环为两个二维数组中的元素均进行了赋值,最后求两个数组元素值的积。浅们只需要注意这两个数组元素在循环中被赋了什么值,当i=3 j=3时,al(3,3)=3+3=6,a2(3。3)= al(3,3)+3+3=12.所以最后二者之积为72。

  • 第19题:

    在窗体画一个命令按钮,然后编写如下事件过程: Private Sub Commandl Click() Dim a(5)As String For i=1 To 5 a(i)=Chr(Asc("A")+(i-1)) Next i For Each b In a Print b; Next End Sub 程序运行后,单击命令按钮,输出结果是______。

    A. ABCDE

    B.1 2 3 4 5

    C.abcde

    D.出错信息


    正确答案:A
    解析:语句Chr(Asc("A")+(i-1))的作用是将字符A的ASCII码值加上循环变量的值减1,求出此ASCII码对应的字符。将计算出的字符赋值给数组arr的第i个元素。循环结束后,arr的5个元素分别为字符ABCDE。Print方法输出项的最后用分号结束,使得输出不换行。

  • 第20题:

    在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim a(5)As String Fori=1 To 5 a(i)=Chr(Asc("A")+(11)) Nexti For Each b In a Print b Next End Sub 程序运行后,单击命令按钮,输出结果是( )。

    A.ABCDE

    B.1 2 3 4 5

    C.abcde

    D.出错信息


    正确答案:A

  • 第21题:

    在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a(5)As String For i=1 T0 5 a(i)=Chr(Asc("A")+(i-1)) Next i For Each b In a Print b; Next End Sub 程序运行后,单击命令按钮,输出结果是______。

    A.ABCDE

    B.1 2 3 4 5

    C.abode

    D.出错信息


    正确答案:A
    解析:本程序段首先定义了一维数组a,然后用For循环为其赋值,Asc()函数的作用是返回字符的ASCII码,字符“A”的ASCII码为65,Chr()函数的作用是将ASCII码值变为相应的字符,而“a(i)=Chr(Asc("A")+(i-1))”的作用是将每次比原来大1的ASCII码值变为字符赋给a,所以a的元素是A、B、C、D、E。For Each-In用于输出a中元素的值。

  • 第22题:

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

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


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

  • 第23题:

    单选题
    在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:运行程序后单击命令按钮,输出结果是(  )。
    A

    123456ABCD

    B

    ABCD123456

    C

    D6C584A321

    D

    A1B2C3D456


    正确答案: B
    解析:
    Len(a)=4,Len(b)=6,字符型变量c用于每次连接计算的结果。Mid(a,k,1)表示从字符串a左边第k个位置开始向右取1个字符。当k=1时,执行第一次循环,两个If语句都被执行,第一个If判断之后,c=″A″,第二个If判断之后,c=″A1″。前四次k的值都可以执行两个If语句。当k=5和6时,第一个If语句不再执行,只执行第二个If语句,最后的结果c=″A1B2C3D456″。

  • 第24题:

    单选题
    在窗体上画一个命令按钮,然后编写如下事件过程:程序运行后,单击命令按钮,输出结果是(  )。
    A

    ABCDE

    B

    1 2 3 4 5

    C

    abcde

    D

    出错信息


    正确答案: A
    解析:
    Asc函数为取ASCII码,Chr函数为从ASCII码计算字符,所以输出A与其后的5位连续字母。