在线题库
[单选] 设有如下通用过程:Public Sub Fun(a(),ByVal x As Integer)For i = 1 To 5x = x + a(i)NextEnd Sub在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下的事件过程Private Sub Command1_Click() Dim arr(5) As VariantFor i = 1 To 5arr(i) = iNextn = 10Call Fun(arr(), n)Text1.Text = nEnd Sub程序运行后,单击命令按钮,则在文本框中显示的内容是( )。
发布时间:2022-09-12
0次
A10B15C25D24