在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Private Sub Command1_Click()Dim aS,b$,c$,k%a=”ABCD”b=”123456”c=””k=1Do While k<=Len(a) Or k<=Len(b)If k<=Len(a)Thenc=c&Mid(a,k,1)End IfIf k<=Len(b)Thenc=c&Mid(a,k,1)End Ifk=k+1LoopPrint cEnd Sub运行程序,单击命令按钮,输出结果是( )。A.12

题目

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

Private Sub Command1_Click()

Dim aS,b$,c$,k%

a=”ABCD”

b=”123456”

c=””

k=1

Do While k<=Len(a) Or k<=Len(b)

If k<=Len(a)Then

c=c&Mid(a,k,1)

End If

If k<=Len(b)Then

c=c&Mid(a,k,1)

End If

k=k+1

Loop

Print c

End Sub

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

A.123456ABCD

B.ABCDl23456

C.D6C584A321

D.A182C3D456


相似考题
更多“在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Private Sub Command1_Click()D ”相关问题
  • 第1题:

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

    A.123.45

    B.12345.00

    C.12345

    D.00123.45


    正确答案:B
    解析:解题的关键是掌握对格式说明字符的理解。0表示一个数字位,0的个数决定了显示区段的长度,多余的位以0补齐;小数点与O结合使用,可以放在显示区段的任何位置,根据格式字符串的位置,小数部分多余的数字按四舍五入处理。由于本题中变量a为12345,并没有涉及小数,故可以直接在其后补两个0。

  • 第2题:

    在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_ Click() Dim arr (10) For i = 1 To 10 arr (i) = i ^ 2 Next i Print arr(i - 2) End Sub程序运行后,单击命令按钮,在窗体上输出的是______。

    A.49

    B.64

    C.81

    D.100


    正确答案:C

  • 第3题:

    在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a=12345 Print Format$(a,"000,00") End Sub 程序运行后,单击命令按钮,窗体上显示的是( )。

    A.123.45

    B.12345.00

    C.12345

    D.00123.45


    正确答案:B

  • 第4题:

    在窗体上画一个命令按钮,其名称为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。

  • 第5题:

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

    A. 123.45

    B.12345.00

    C.12345

    D.00123.45


    正确答案:B
    解析:对于符号“0”,实际数字小于符号位数时,数字前后加0;大于时,若要显示数值表达式的整数部分位数多于格式字符串的位数,按实际数值显示。若小数部分的位数多于格式字符串的位数,按四舍五入显示。

  • 第6题:

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

    Private Sub Command1_Click()

    a = 12345

    Print Format$(a, "000.00")

    End Sub

    程序运行后,单击命令按钮,窗体上显示的是( )。

    A.123.45

    B.12345.00

    C.12345

    D.00123.45


    正确答案:B