设有如下通用过程: Public Sub Fun(a(), ByVal x As Integer) For i=1 To 5 x = x + a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下的事件过程: Private Sub Commandl Click() Dim arr(5) As Variant For i=1 To 5 arr(i) =i Next n = 10 Call Fun(arr(), n) Text1.Text=n End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是A.10B.15C.25D.24

设有如下通用过程: Public Sub Fun(a(), ByVal x As Integer) For i=1 To 5 x = x + a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下的事件过程: Private Sub Commandl Click() Dim arr(5) As Variant For i=1 To 5 arr(i) =i Next n = 10 Call Fun(arr(), n) Text1.Text=n End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是

A.10

B.15

C.25

D.24


相关考题:

设有如下通用过程: Public FunctionFun(x Str As String)As String DimtStr As String,strL As Integer tStr="" strL=Len(xStr) i=1 DoWhilei<=strL/2 tStr=tStrMid(xStr,i,1)Mid(xStr,strL-i+1,1)" i=i+1 Loop Fun=tStr End Function 在窗体A.ABCDEFB.abcdefC.AFBECDD.DEFABC

设有如下通用过程: Public Sub Fun(a() As Integer, x As Integer) For i=1 To 5 x=x+a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程: Private Sub Command1_Click() Dim arr(5)As Integer, n As Integer For i=1 To 5 art(i)=i+i Next Fun arr, n Text1. Text=Str(n) End Sub 程序运行后,单击命令按钮,在文本框中显示的内容是______。A.30B.25C.20D.15

设有如下通用过程: Public Sub Fun(a()As Integer,x As Integer) For i=1 To 5 x=x+a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Commandl的命令按钮。然后编写如下的事件过程: Private Sub Commandl_Click() Dim arr(5)As Integer,n As Integer For i=1 To 5 arr(i)=i+i Next Fun arr,n Text1.Text=Str(n) End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是______。A. 30B.25C.20D.15

设有如下通用过程:Public Sub Fun(a() As Integer, x As Integer)For i = 1 To 5x = x + a(i)NextEnd Sub在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程:Private Sub Command1_Click()Dim arr(5) As Integer, n As IntegerFor i = 1 To 5 arr(i) = i + iNext Fun arr, n Text1.Text = Str(n)End Sub程序运行后,单击命令按钮,则在文本框中显示的内容是( )。A.30B.25C.20D.15

设有如下通用过程: Public Sub Fun(a( )As Integer,x As Integer) For i=1 TO 5 x=x+a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程: Private Sub Command1_Cliek( ) Dim arr(5) As Integer,n As Integer For i=1 To 5 arr(i)=i+i Next Fun arr,n Text1.Text=Str(n) End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是A.30B.25C.20D.15

设有如下通用过程: Public Sub Fun(a(),By Val x As Integer) Fori=1 To 5 x=x+a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Commandl的命令按钮,然后编写如下的事件过程: Private Sub Commandl_Chck() Dimart(5)As Variant Fori=1 To 5 arr(i)=iA.10B.15C.25D.24

设有如下通用过程: Public Sub Fun(a(),ByVal x As Integer) For i=1 To 5 x=x+a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下的事件过程: Private Sub Command1_Click() Dim arr(5)As Variant For i=1 To 5 arr(i)= i Next n=10 Call Fun(arr(),n) Text1.Text=n End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是 ______。A.10B.15C.25D.24

设有如下通用过程: Public Sub Fun(a()As Integer,x As Integer) For i=1 To 5 x=x+a(i) Next End Sub 在窗体上绘制一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程: Private Sub Command1_Click() Dim arr(5) As Integer,n AsInteger For i=1 To 5 arr(i)=i+i Next Fun arr,n Text1.Text=Str(n) End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是( )。A.30B.25C.20D.15

设有如下通用过程: Public Sub Fun(a( ),ByVal x As Integer) For i=1 To 5 x=x+a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下的事件过程: Private Sub Command1_Click( ) Dimsn(5)As Variant For i=1 To 5 arc(i)=i Next n=10 Call Fun(arr( ),n) Textl.Text=n End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是A.10B.15C.25D.24