[单选题]

下列事件过程:Private Sub Command1_ Click() MsgBox Str (123+123)End Sub运行时,信息框中出现的结果是______。

A.123+123

B.123

C.246

D.显示出错信息

参考答案与解析:

相关试题

程序段如下:Private Sub Command1_ Click()a = 0

[单选题]程序段如下:Private Sub Command1_ Click() a = 0 for 1=15 To 15 Step- 2 a = a +1 Next I Print a, IEnd Sub发生Command 1的单击事件后,程序的输出结果是 ______。A.0 13B.15 13C.0 15D.15 15

  • 查看答案
  • 设有如下程序:Private Sub Command1_ Click() Dim

    [单选题]设有如下程序: Private Sub Command1_ Click() Dim sum As Double, x As Double sum=0 n=0 For i=1 To 3 x=n/i n=n+1 sum=sum+x Next i End Sub 该程序通过For循环来计算sum的值,sum值的精确结果是( )。A.1+1/2+2/3B.1+1/2+1/3+1C.1/2+2/3D.1/2+1/3

  • 查看答案
  • 有下列事件过程:Private Sub Command1_Click()b =

    [单选题]有下列事件过程: Private Sub Command1_Click() b = 10 Do Until b = -1 a = InputBox("请输入a的值") a = Val(a) b = InputBox("请输入b的值") b = Val(b) a = a * b Loop Print End Sub程序运行后,依次输入数值30,20,10,-1后,输出结果是。A. 6000 B. -10 C. 200 D. -6000

  • 查看答案
  • 给出下面的程序:Private Sub Command1_ Click()Dim

    [单选题]给出下面的程序:Private Sub Command1_ Click() Dim Check, Counter Check= True: Counter = 0 do do while Counter < 20 Counter = Counter +1 if Counter = 10 then Check=False exit do End if Loop Loop until Check=False MsgBox CounterEnd Sub 程序最后弹出的消息对话框的内容是______。A

  • 查看答案
  • 有下列事件过程:Private Sub Command1_Click()b=10

    [单选题]有下列事件过程:Private Sub Command1_Click()b=10D.o Until b=-1a=InputBox("请输入a的值")a=Val(A)b=InputBox("请输入b的值")b=Val(B)a=a*bLoopPrint aE.nd Sub程序运行后,依次输入数值30,20,10,-1后,输出结果是( )。A.6000B.-10C.200D.-6000

  • 查看答案
  • 有如下事件过程: Private Sub Command1_Click() b=

    [单选题]有如下事件过程: Private Sub Command1_Click() b=10 Do Until b=-1 a=InputBox("请输入a的值") a=Val(A)b=InputBox("请输入b的值") b=Val(B)a=a * b Loop Print aEnd Sub程序运行后,依次输人数值30,20,10,-1,输出结果为A.6000B.-10C.200D.-6000

  • 查看答案
  • 有如下事件过程:Private Sub Command1_Click() b=1

    [单选题]有如下事件过程: Private Sub Command1_Click() b=10 Do Until b =-1 a = InputBox("请输入a的值") a = Val(a)b = InputBox("请输入b值") b = Val(b)a=a*b Loop Print a End Sub 程序运行后,依次输入数值30,20,10,-1后,输出结果为( )。A.6000B.-10C.200D.-6000

  • 查看答案
  • 有如下事件过程:Private Sub Command1_Click()b=10

    [单选题]有如下事件过程: Private Sub Command1_Click() b=10 Do Until b=-1 a=InputBox("请输入a的值") a=Val(A) b=InputBox("请输入b的值") b=Val(B) a=a*b Loop Print a End Sub 程序运行后,依次输入数值30,20,10,-1后,输出结果为( )。A.6000B.-10C.200D.-6000

  • 查看答案
  • Command1_Click()事件代码如下:Private Sub Comma

    [单选题]C.ommand1_Click()事件代码如下: Private Sub Command1_Click() Dim x As Integer, Y As Integer x = 6 : Y : 8 Call ABC(X, Y) Print X; Y End Sub Private Sub ABC(ByVal X As Integer,Y As Integer) X = X + 4 Y = Y = 2 End Sub 事件发生后,X和Y的值分别为 ______。A.6, 8B.10, 10C.10

  • 查看答案
  • 下列事件过程运行后输出结果是Private Sub Command1_Click

    [单选题]下列事件过程运行后输出结果是 Private Sub Command1_Click() Print Format$(123,456,"###,##%") End SubA.123.46%B.123.45%C.123.456%D.12345.6%

  • 查看答案
  • 下列事件过程:Private Sub Command1_ Click()MsgB