在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码；PrivateSubCommand1_Click()s="ABBACDDCAB"Fori=6To2Step-2x=Mid(s,i,i)y=LeR(s,i)z=Right(s,i)z=x&y&zNextiMsgBoxzEndSub窗体打开运行后，单击命令按钮，则消息框的输出结果是______。A．AABAABB．ABBABAC．BABBAD．BBABBA

题目

在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码；PrivateSubCommand1_Click()s="ABBACDDCAB"Fori=6To2Step-2x=Mid(s,i,i)y=LeR(s,i)z=Right(s,i)z=x&y&zNextiMsgBoxzEndSub窗体打开运行后，单击命令按钮，则消息框的输出结果是______。

A．AABAAB

B．ABBABA

C．BABBA

D．BBABBA

相似考题

1.（ 11 ）在窗体中添加一个名称为 Command1 的命令按钮，然后编写如下事件代码：Private Sub Command1_Click( )Dim x As Integer, y As Integerx=12 : y=32Call p(x, y)MsgBox x*yEnd SubPublic Sub p (n As Integer, By Val m As Integer)n=n Mod 10m=m Mod 10End Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为 ___________ 。

2.在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：

3.在窗体中添加一个命令按钮(名称为Command1)，然后编写如下代码： Private Sub Command1_Click() a=0:b=5:c=6 MsgBox a=b＋c End Sub 窗体打开运行后，如果单击命令按钮，则消息框的输出结果为______。A．11B．a=11C．0D．False

4.在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序：Private Sub Command1_Click（）Dim s，iFor i=1 To 10s=s+iNext iMsgBox sEnd Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为 。

参考答案和解析
正确答案：D
更多“在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码;PrivateSubCommand1_Click()s= ”相关问题

  • 第1题：

    在窗体中添加—个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_Click() s="ABBACDDCBA" For I=6 To 2 Step -2 x=Mid(s,I,I) y=Left(s,I) z=Right(s,I) z=x & y & z Next I MSgBox z End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是______。

    A．AABAAB

    B．ABBABA

    C．BABBA

    D．BBABBA


    正确答案：D
    解析：Mid(字符表达式，数值表达式1，数值表达式2)：返回一个值，该值是从字符表达式最左端某个字符开始，截取到某个字符为止的若干字符。其中，数值表达式1的值是开始的字符位置，数值表达式2是终止的字符位置。Left(字符表达式，数值表达式)：返回一个值，该值是从字符表达式左侧第1个字符开始，截取的若干字符。具中，字符个数是数值表达式的值。Right(字符表达式，数值表达式)：返回一个值，该值是从字符表达式右侧第1个字符开始，截取的若干字符。其中，字符个数是数值表达式的值。For循环运行三次，最后一次循环结束后，x="BB"，y="AB"，z="BA"，所以z="BBABBA"。

  • 第2题：

    （ 34 ）在窗体中添加一个名称为 Command1 的命令按钮，然后编写如下事件代码：

    Private Sub Command1_Click( )

    s="ABBACDDCBA"

    For I=6 To 2 Step -2

    x=Mid(s,I,I)

    y=Left(s,I)

    z=Right(s,I)

    z=x & y & z

    Next I

    MsgBox z

    End Sub

    窗体打开运行后，单击命令按钮，则消息框的输出结果是

    A ） AABAAB

    B ） ABBABA

    C ） BABBA

    D ） BBABBA


    正确答案：D

  • 第3题：

    （ 11 ）在窗体中添加一个命令按钮（名称为 Command1 ），然后编写如下代码：

    Private Sub Command1_Click( )

    Static b As Integer

    b=b+1

    End Sub

    窗体打开运行后，三次单击命令按钮后，变量 b 的值是 【 11 】 。


    正确答案：

  • 第4题：

    在窗体中添加一个命令按钮(名称为Command1)，然后编写如下代码： Private Sub Command1_Click() a=3:b=4:c=5 MsgBox a=b+c End Sub 窗体打开运行后，如果单击命令按钮，则消息框的输出结果为( )。

    A．0

    B．9

    C．a=9

    D．假


    正确答案：D
    解析： 本题考查VBA程序设计的基础知识。程序中的”MsgBox a=b+c”语句中的“=”的含义是判断是否相等而不是赋值，这条语句的含义是在消息框中显示a与b+c的值比较的结果t由于变量的初值”a=3:b=4:c=5”。所以判断条件语句相当于判断3=9是否为真，很明显结果为假，所以消息框的输出结果为逻辑假False。

  • 第5题：

    （ 11 ）在窗体中添加一个命令按钮，名称为 Command1 ，然后编写如下程序：

    Private Sub Command1_Click()

    Dim s ， i

    For i=1 To 10

    s=s+i

    Next i

    MsgBox s

    End Sub

    窗体打开运行后，单击命令按钮，则消息框的输出结果为 【 11 】 。


    正确答案：

相关内容