[单选题]

在窗体上画一个按钮,然后编写如下的事件代码。在按钮上单击,输出为( )。 Option Base 1 Private Sub fun (a()As Integer,n As Integer) For i=1 To 2 t=a(i):a(i)=a(5-i+1):a(5-i+1)=t Next i End Sub Private Sub Command1_Click() Dim arr1(5)As Integer For i=1 To 5 arr1(i)=i Next i Call fun(arr1,5) Print arr1(1);arr1(2) End Sub

A.1 2

B.2 1

C.5 4

D.4 5

参考答案与解析:

相关试题

在窗体上画一个按钮,然后编写如下的事件代码。在按钮上单击,输出为()。Priva

[单选题]在窗体上画一个按钮,然后编写如下的事件代码。在按钮上单击,输出为( )。 Private Sub fun() Static a As Integer a=a+2 Print a; End Sub Private Sub Command1_Click() Dim m As Integer For m=1 To 3 Call fun Next m End SubA.2 2 2B.0 0 0C.2 4 8D.2 4 6

  • 查看答案
  • 在窗体上画一个按钮,然后编写如下的事件代码。在按钮上单击,输出为()。Priva

    [单选题]在窗体上画一个按钮,然后编写如下的事件代码。在按钮上单击,输出为( )。 Private Sub func(a As Integer) Static m As Integer m=m+a Print m; End Sub, Private Sub Command1_Click() Dim k As Integer k=4 Call func(k) Call func(k) End SubA.4 8B.4 4C.8 8D.8 4

  • 查看答案
  • 在窗体上画一个按钮,然后编写如下事件代码。单击按钮,输出为 ______。Pri

    [单选题]在窗体上画一个按钮,然后编写如下事件代码。单击按钮,输出为 ______。 Private Function fun3(x As Integer) Static t As Integer t = t + 3 t = t + x fun3 = t End Function Private Sub Commandl Click() Dim a As Integer, b As Integer, c As Integer a = 2 : b = 1 c = fun3 (A)c = fun3 (B)Pr

  • 查看答案
  • 在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程:Optio

    [单选题]在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Option Base 0 Private Sub Command1_Click() Dim city As Variant city=Array("北京","上海","天津","重庆") Print city(1) End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是______。A.空白B.错误提示C.北京D.上海

  • 查看答案
  • 在窗体上画一个命令按钮,然后编写如下程序。运行后,单击命令按钮,输出结果为 ()

    [单选题]在窗体上画一个命令按钮,然后编写如下程序。运行后,单击命令按钮,输出结果为 ( )。Private Sub Command4_Click()D.ima As Integer,bASIntegera=1b=2PrintN(a,b)E.nd SubF.unction N(X As Integer,yAsInteger)AsIntegerN=IIf(x>y,x,y)E.nd FuncfionA.B.C.D.

  • 查看答案
  • 在窗体上画一个命令按钮,名称为 Command1, 然后编写如下代码:Optio

    [单选题]在窗体上画一个命令按钮,名称为 Command1, 然后编写如下代码:Option Base 0Private Sub Command1_Click()D.im A (4)As Integer,B(4) As IntegerF.or k=0 To 2A.(k+1)=InputBox(“ 请输入一个整数 ”)B.(3-k)=A(k+1)Next kPrint B(k)E.nd Sub程序运行后,单击命令按钮,在输入对话框中分别输入2、4、6,输入结果为( )。 A.0B.2C.3D.4

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

    [单选题]在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程: Option Base 0 Private Sub Command1_Click() Dim city As Variant city=Array("北京","上海","天津","重庆") Print city(1) End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.空白B.错误提示C.北京D.上海

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

    [单选题]在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程; Option Base 0 Private Sub Command1_Click() Dim city As Variant city=Array("北京", "上海", "天津", "重庆") Print city(1) End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是______。A.空白B.错误提示C.北京D.上海

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

    [单选题]在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: option Base 1 Private Sub Command1_Click() Dim a a=Array(1, 2, 3, 4, 5) For i=1 To UBound(a)a(i)=a(i)+i-1 Next Print a(3) End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是______。A.4B.5C.6D.7

  • 查看答案
  • 在窗体上画一个命令按钮,然后编写如下事件过程: PrivateSubComman

    [单选题]在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()D.im m As Integer, n As Integer, p As Integerm=3: n=5: p=0C.all Y(m, n, p)Print Str(p)E.nd SubSub Y(ByVal i As Integer, ByVal j As Integer, k As Integer)k=i + jE.nd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A

  • 查看答案
  • 在窗体上画一个按钮,然后编写如下的事件代码。在按钮上单击,输出为()。Optio