在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序: Private Sub Command1_Click() Dim a As Integer, b As String, c As Integer a=1234: b=Str(a)c=Len(b)Print c End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是______。A.0B.5C.6D.7

题目

在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序: Private Sub Command1_Click() Dim a As Integer, b As String, c As Integer a=1234: b=Str(a)c=Len(b)Print c End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是______。

A.0

B.5

C.6

D.7


相似考题
参考答案和解析
正确答案:B
解析:当一数字用函数Str(数字)转成字符串时,总会在前头保留一空位来表示正负。如果数字为正,返回的字符串包含一前导空格暗示有一正号。
更多“在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:Private Sub Command1_Click()Dim a ”相关问题
  • 第1题:

    在窗体中添加一个名称为Coml的命令按钮,然后编写如下程序:


    正确答案:
    3【解析】本题考查VBA程序的知识。在VBA的过程调用时,参数有两种传递方式:传址传递和传值传递。如果在过程声明时形参用ByVal声明,说明此参数为传值调用,此时形参的变化不会返回到实参;若用ByRef声明,说明此参数为传址调用,此时形参的变化将会返回到实参;没有说明传递类型,则默认为传址传递。此题中形参P被说明为ByVal传值形式的整型量,当运行Cornl-click过程时调用s函数,实参i传送其值给形参P,P发生变化p=p*2=3*2=6。但因为使用的是ByVal传值传递,所以实参i的值不发生变化,if语句中的判断条件为假,所以会直接执行MsgBox i语句后输出3。

  • 第2题:

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

    程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。

    A.

    B.H

    C.

    D.


    正确答案:A
    【解析】分析程序,程序开始循环时i=1,j=1to1,PrintSUing(i,“Hello”)语句输出一个H,然后执行Print进行换行;当i=2时,j=1to2,PrintString(i,“Hello”)语句输出两行分别为两个HH,然后执行Print换行:当i=3时,退出循环。

  • 第3题:

    ( 11 )在窗体中添加一个命令按钮,名称为 Command1 ,然后编写如下程序:

    Private Sub Command1_Click()

    Dim s , i

    For i=1 To 10

    s=s+i

    Next i

    MsgBox s

    End Sub

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


    正确答案:

  • 第4题:

    在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:程序运行后,如果单击命令按钮,则在面体上显示的内容是( )。


    正确答案:A
    A)    【解析】本题考查循环嵌套程序分析。外层循环共执行2次,第一次执行外循环,内层循环变量为1到1,执行一次;第二次执行外循环,内层循环变量为1到2,执行2次。String 函数产生i个“Hello”中的第一个字符H。

  • 第5题:

    在窗体中添加一个命令按钮,名称为Commandl,然后编写如下程序:

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


    正确答案:
    2500【解析】本题考查循环的知识。这个问题比较简单,实际上就是求l到100之间的奇数和,最终结果为2500。