[单选题]

在窗体上添加一个命令按钮,名为command1,事件过程为:

Private Sub command1_Click( )

x=0

D.o Until c=-1

a= val(InputBox(“输入a的值”))

b= val(InputBox(“输入b的值”))

c= val(InputBox(“输入c的值”))

Loop

Print a

E.nd Sub

程序运行后,单击命令按钮,依次在输入对话框中输入5,4,3,2,1,-1后,输出的结果是 ( )

A.2

B.3

C.4

D.5

参考答案与解析:

相关试题

在窗体上添加一个命令按钮(名为Command1),编写如下事件过程:Privat

[单选题]在窗体上添加一个命令按钮(名为Command1),编写如下事件过程: Private Sub Command1_Click() For i=1 To 4 x=4 For j=1 To 3 x=3 For k=-1 To 2 x=x+6 Next k Next j Next i MsgBox x End Sub 打开窗体后,单击命令按钮,消息框的输出结果是( )。A.7B.15C.157D.528

  • 查看答案
  • 在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程: Pri

    [单选题]在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:Private Sub Command1_Click()F.or i=1 To 4x=4F.or j=1 To 3x=3F.ork=1 To 2x=x+6Next kNext jNext iMsgBox xE.nd Sub打开窗体后,单击命令按钮,消息框的输出结果是( )。A.7B.15C.157D.528

  • 查看答案
  • 在窗体上添加一个命令按钮(名为Command1,然后编写如下事件过程:Priva

    [单选题]在窗体上添加一个命令按钮(名为Command1,然后编写如下事件过程: Private Sub Command1_Click( ) For i=1 To 4 x=4 For j=1 To 3 x=3 For k=1 To 2 x=x+6 Next k Next j Next i MsgBox x End Sub 打开窗体后,单击命令按钮,消息框的输出结果是______。A.7B. 15C. 157D. 538

  • 查看答案
  • 在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程: Pri

    [单选题]在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:Private Sub Command1_Click()F.or i=1 To 4x=4F.or j=1 To 3x=3F.or k=1 To2x=x+6Next kNext jNext iMsgBox xE.nd Sub打开窗体后,单击命令按钮,消息框的输出结果是A.7B.15C.157D.538

  • 查看答案
  • 在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:Priv

    [单选题]在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程: Private Sub Command1_Click() For i=l To 4 x=4 For j=1 To 3 x=3 Fork=1 To 2 x=x+6 Next k Next j Next i MsgBox x End Sub 打开窗体后,单击命令按钮,消息框的输出结果是( )。A.7B.15C.157D.528

  • 查看答案
  • 在窗体上添加一个命令按钮,名为Command1,然后为该命令按钮编写如下事件过程

    [单选题]在窗体上添加一个命令按钮,名为Command1,然后为该命令按钮编写如下事件过程,该过程执行结果为______。Option Base 1Private Sub Cemmand1_Click() Dim a As Variant a = Array(1, 2, 3, 4) j = 1 for i = 4 To 1 Step - 1 s = s+ a(i)* j j= j* 10 Next i Print sEnd SubA.4321B.1234C.34D.12

  • 查看答案
  • 在窗体中有一个命令按钮Command1,对应的事件代码如下:Private Su

    [单选题]在窗体中有一个命令按钮Command1,对应的事件代码如下: Private Sub Command1_Enter() Dim num As Integer Dim a As Integer Dim b As Integer Dim i As Integer For i=1 To 10 num=InputBox("请输入数据:","输入",1) If Int(num/2)=num/2 Then a=a+1 Else b=b+1 End If Next i MsgBox("运行结果:a=

  • 查看答案
  • 在窗体上添加有一个命令按钮,(名为Command1),然后编写如下事件过程:Pr

    [单选题]在窗体上添加有一个命令按钮,(名为Command1),然后编写如下事件过程: Private Sub Command1_Click() For i=1 To 4 x=4 For j=1 To 3 x=3 For k=1 To 2 x=x+6 Next k Next j Next I MsgBox x End Sub 打开窗体后,单击命令按钮,消息框的输出结果是 ______。A.7B.15C.157D.538

  • 查看答案
  • 在窗体上添加一个命令按钮,名为Command1,事件过程如下,则执行结果是___

    [单选题]在窗体上添加一个命令按钮,名为Command1,事件过程如下,则执行结果是______。A.2 4 6 8B.1 3 5 7C.3 6 6 12D.4 8 12 16

  • 查看答案
  • 在窗体上添加一个命令按钮,名为Command1,事件过程如下:程序运行后,单击命

    [单选题]在窗体上添加一个命令按钮,名为Command1,事件过程如下:程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1后,输出的结果是______。A.5B.4C.3D.2

  • 查看答案
  • 在窗体上添加一个命令按钮,名为command1,事件过程为:Private Su