[单选题]

在通用声明中定义a,在窗体中添加一个命令按钮Command1,编写如下程序代码:

D.imaAsInteger

Subtest()

a=a+1:b=b+1:c=c+1

Print"Sub:";a;",";b;",";c

E.ndSub

PrivateSubCommand1_Click()

a=2:b=3:c=4

C.alltest

C.alltest

E.ndSub

程序运行后,单击命令按钮,窗体中将显示( )

A.Sub:3,4,5Sub:4,5,6

B.Sub:2,3,4Sub:2,3,4

C.Sub:3,1,1Sub:4,1,1

D.Sub:1,1,1Sub:1,1,1

参考答案与解析:

相关试题

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

[单选题]在窗体中添加一个命令按钮(名称为Command1),然后编写如下代码: Private Sub Command1_Click() a=0:b=5:c=6 MsgBox a=b+c End Sub 窗体打开运行后,如果单击命令按钮,则消息框的输出结果为______。A.11B.a=11C.0D.False

  • 查看答案
  • 在窗体中添加一个命令按钮(名称为Command1) ,然后编写如下代码:Priv

    [单选题]在窗体中添加一个命令按钮(名称为Command1) ,然后编写如下代码: Private Sub Command1_Click( ) A=95 If A>60 Then I=1 If A>70 Then I=2 If A>80 Then I=3 If A>90 Then I=4 MsgBox I End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果是______。A.1B.2C.3D.4

  • 查看答案
  • 在窗体中添加一个名为Command1的命令按钮,然后编写如下事件代码:Priva

    [单选题]在窗体中添加一个名为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click( ) a=75 If a>60 Then k=1 ElseIf a>70 Then k=2 ElseIf a>80 Then k=3 ElseIf a>90 Then k=4 EndIfA.1B. 2C. 3D. 4

  • 查看答案
  • 在窗体中添加一个命令按钮(名称为Command1),然后编写如下代码:Priva

    [单选题]在窗体中添加一个命令按钮(名称为Command1),然后编写如下代码: Private Sub Command1_Click() a=3:b=4:c=5 MsgBox a=b+c End Sub 窗体打开运行后,如果单击命令按钮,则消息框的输出结果为( )。A.0B.9C.a=9D.假

  • 查看答案
  • 在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序: Priva

    [试题]在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:Private Sub Command1_Click()D.im s,iF.or i=1 To 10s=s+iNext iMsgBox sE.nd Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为 。

  • 查看答案
  • 在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:

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

  • 查看答案
  • 在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:Privat

    [单选题]在窗体中添加一个命令按钮,名称为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的命令按钮,然后编写如下事件代码:Priv

    [单选题]在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_CliCk() A=75 If A>60 Then I=1 If A>70 Then I=2 If A>80 Then I=3 If A>90 Then I=4 MsgBox I End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果是______。A.1B.2C.3D.4

  • 查看答案
  • 在窗体中添加一个名称为 Command1 的命令按钮,然后编写如下事件代码: P

    [单选题]在窗体中添加一个名称为 Command1 的命令按钮,然后编写如下事件代码: Private Sub Commandl _Click() a=75 If a>60 Then k=1 ElseIf a>70 Then k=2 ElseIf a>80 Then k=3 Elself a>90 Then k=4 EndIf MsgBox k End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果是______。A.1B.2C.3D.4

  • 查看答案
  • 在窗体中添加一个命令按钮(其Name属性为Command1),然后编写如下代码:

    [单选题]在窗体中添加一个命令按钮(其Name属性为Command1),然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a a=Array(2,4,6,8) j=1 For i=4 To 1 Step-2 s=s+a(i)*j j=j*10 Next i Print 3 End Sub 运行上面的程序,单击命令按钮,其输出结果是 ( )A.2B.4C.8D.48

  • 查看答案