设有如下通用过程： Public Sub Fun(a()As Integer,x As Integer) 　　For i=1 To 5 　　　x=x+a(i) 　　Next End Sub 在窗体上绘制一个名称为Text

admin2013-04-11 50

问题设有如下通用过程： 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、30
B、25
C、20
D、15

答案A

解析

转载请注明原文地址:https://kaotiyun.com/show/AEQp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类