执行下面的程序，消息框里显示的结果是（ ）。A. abeB. abccbaC. cbacbaD. abcabc

题目

执行下面的程序，消息框里显示的结果是（ ）。

A. abe

B. abccba

C. cbacba

D. abcabc

相似考题

1.执行下列的程序，消息框里显示的结果是______。Pfivate Sub Form_Click()Dim Str As StringStr＝""S="Access"For i＝Len(S) To 1 Step-1Str＝Str&Mid(S.i,1)Next IMsgBox StrEnd Sub

2.执行下面的程序，消息框的输出结果是__________。

3.执行下面的程序，消息框里显示的结果是 【 】 。Private Sub Form_Click()Dim Str As String， K As IntegerStr="ab"For k=Len(Str) TO 1 Step-1Str=Str & Chr(Asc(Mid(Str，k，1))+k)Next kMsgBox StrEnd Sub

4.执行下面的程序，消息框里显示的结果是_______。Private Sub Form_Click()Dim Str As StringStr=""S="Access"Fori=Len(S)To 1 Step-lStr=Str&Mid(S，i，1)Next iMsgBox StrEnd Sub

更多“ 执行下面的程序，消息框里显示的结果是（ ）。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来处理，故消息

相关内容