窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub Command1_Click()x = InputBox("x=")y = InputBox("y=")Print x + yEnd Sub运行后,单击命令按钮,先后在两个输入对话框中输入123和321,窗体显示的内容是( )。A、 444B、 123321C、 123+321D、 出错信息

题目

窗体上有一个命令按钮Command1,编写如下事件过程:

Private Sub Command1_Click()

x = InputBox("x=")

y = InputBox("y=")

Print x + y

End Sub

运行后,单击命令按钮,先后在两个输入对话框中输入123和321,窗体显示的内容是( )。

A、 444

B、 123321

C、 123+321

D、 出错信息


相似考题
更多“窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub Command1_Click()x = InputBox( ”相关问题
  • 第1题:

    在窗体上有一个命令按钮,然后编写如下事件过程 Private Sub Command1 _ cickc ( ) a=InputBox("enter the first integer") b=InputBox("enter the second integer") Print b + a End Sub 程序运行后,单击命令按钮,先后在两个输入框中分别输入“2”和“6”,则输出结果为

    A.2

    B.62

    C.8

    D.26


    正确答案:B
    解析:在默认的情况下,InputBox函数的返回值是一个字符串类型,而不是变体类型。如果没有事先声明返回值变量的类型,或声明为变体类型,则当把函数的返回值赋给这个变量时,VisualBasic将是把它作为字符串来处理。因此当需要用InputBox函数输入数据,并且需要输入的数值参加运算时,必须在进行运算前用Val函数(或其他函数)把它转换为相应类型的数值,否则有可能会得到不正确的结果。如果正确地声明了返回值的变体类型,则可不必进行类型转换;由于本题没有事先声明变量,所以a和b所获得的为字符“2”和“6”,所以输出“62”。

  • 第2题:

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

    Private Sub Command1_Click()

    x = -5

    If Sgn(x) Then

     y = Sgn(x ^ 2)

    Else

     y = Sgn(x)

    End If

    Print y

    End Sub

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

    A.-5

    B.25

    C.1

    D.-1


    正确答案:C

  • 第3题:

    18、在窗体上添加一个命令按钮Command1,编写如下事件过程,运行时单击命令按钮,如果在输入对话框中输入3,则在窗体上显示的内容是()。 Private Sub Command1_Click() Dim i%, j%, x%, n% x = 0 n = InputBox("Input") For i = 1 To n For j = 1 To i x = x + j Next j Next i Print x End Sub

    A.6

    B.10

    C.14

    D.18


    Len(Str$(A)+Space(10))

  • 第4题:

    在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() x=0 n=InputBox("") For i=1 To n For j=1 To i x=x+1 Next j Next i Print x End Sub 程序运行后,单击命令按钮,如果输入3,则在窗体上显示的内容是______。

    A.3

    B.4

    C.5

    D.6


    正确答案:D
    解析:变量x的功能为计算循环的次数。对于双重循环,如果“i=1 to n”和“j=1 to n”,则循环次数为n×n;如果“i=1 to n”和“j=1 to i”,循环次数为(1+n)×n/2。本题的循环次数为(1+3)×3/2=6。

  • 第5题:

    在窗体上添加一个命令按钮Command1,编写如下事件过程,运行时单击命令按钮,如果在输入对话框中输入3,则在窗体上显示的内容是()。 Private Sub Command1_Click() Dim i%, j%, x%, n% x = 0 n = InputBox("Input") For i = 1 To n For j = 1 To i x = x + j Next j Next i Print x End Sub

    A.6

    B.10

    C.14

    D.18


    C