[單項(xiàng)選擇題] 設(shè)有如下通用過(guò)程： Public Sub Fun(a()，ByVal x As Integer) For i=1 To 5 x=x+a(i
2021-07-20
[單項(xiàng)選擇題] 設(shè)有如下通用過(guò)程：
Public Sub Fun(a()，ByVal x As Integer)
For i=1 To 5
x=x+a(i)
Next
End Sub
在窗體上畫一個(gè)名稱為Text1的文本框和一個(gè)名稱為Command1的命令按鈕，然后編寫如下的事件過(guò)程：
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
程序運(yùn)行后，單擊命令按鈕，則在文本框中顯示的內(nèi)容是 ______。
A．10
B．15
C．25
D．24
正確答案：A
參考解析：Fun函數(shù)的參數(shù)x為傳值調(diào)用。在函數(shù)中，對(duì)x值的改變不能夠返回給n，因此最后n的值仍然為10，沒(méi)有改變。故應(yīng)選擇A。
詞條內(nèi)容僅供參考，如果您需要解決具體問(wèn)題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。