itgle.com
更多“ 执行下面的程序,消息框里显示的结果是( )。A. abeB. abccbaC. cbacbaD. abcabc ”相关问题
  • 第1题:

    下面程序段执行后消息框的输出结果是( )。

    A. 1

    B. 12

    C. 123

    D. 1234


    正确答案:B
    本题考查VBA中循环的知识。对于这种循环结构,首先看条件判断在循环体的前面还是后面,如果是先判断条件,则有可能一次也不执行循环体;如果是后判断条件,则无论条件如何至少执行一次循环体。在Until循环中条件为False时执行循环体,条件为True时退出循环:在While循环中条件为True时执行循环体,条件为False时退出循环,这一点要注意区分清楚。本题是一个后判断条件的While循环,在循环中首先利用整除10去掉a的最后一位,然后判断当前的a的个位数上的值是否满足循环条件,直至a=12时由于个位数为2不满足继续循环的条件从而退出循环。

  • 第2题:

    编写如图所示应用程序,单击选择菜单项退出后,显示下面的请选择对话框,选择是结束程序,选择否显示下面的消息对话框。


    图标

  • 第3题:

    下面的程序段运行后,消息框显示的结果是______。 For i = 1 To 4 n = 1 For j = 1 To i n = n * j Next j Next i MsgBox(n)

    A.4

    B.5

    C.24

    D.288


    B解析:本题考查VBA中表达式运算的知识。在VBA中允许逻辑量进行算术运算,True处理成-1,Fa

  • 第4题:

    执行下面的程序,消息框里显示的结果是( )。

    Private Sub Form_Click()

    Dim Str As String,S As String,k As Integer

    S=Str

    For k=Len(Str) To 1 Step -1

    S=S & (Mid(Str,k,1)

    Next k

    End Sub


    正确答案:abccba
    abccba

  • 第5题:

    程序段如下,程序运行后消息框显示的结果是______。 Dim a, s As String, i As Integer a = "晴空万里" s = "" For i = 1 To 4 Step 2 s &= Mid(a, 4 - i, 2) Next MsgBox(s)

    A.晴空万里

    B.万里晴空

    C.晴空

    D.万里


    B解析: 本题中a>b返回True,即c=True,而在算术表达式中,True作为-1来处理,故消息