[單項選擇題] 設(shè)有如下通用過程： Public Sub Fun(a() As Integer, x As Integer) For i=1 To 5 x
2021-07-20
[單項選擇題] 設(shè)有如下通用過程：
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
程序運(yùn)行后，單擊命令按鈕，在文本框中顯示的內(nèi)容是______。
A．30
B．25
C．20
D．15
正確答案：A解析：[分析]： 在Command1_Click過程中，數(shù)組arr(1)～arr(5)的初值為2、4、6、8、10，在子函數(shù)Fun中，數(shù)組arr的內(nèi)容傳送給數(shù)組a，在For-Next循環(huán)中將其內(nèi)容相加起來的30賦給變量x，x的內(nèi)容按地址傳送的方式傳給變量n，函數(shù)Str將n的內(nèi)容轉(zhuǎn)換成字符串在Text1中顯示出來。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。