[單項選擇題] 設有如下通用過程： Public Sub Fun(a()，ByVal x As Integer) For i=1 To 5 x=x+a(i
2021-07-20
[單項選擇題] 設有如下通用過程：
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
程序運行后，單擊命令按鈕，則在文本框中顯示的內(nèi)容是 ______。
A．10
B．15
C．25
D．24
正確答案：A
參考解析：Fun函數(shù)的參數(shù)x為傳值調用。在函數(shù)中，對x值的改變不能夠返回給n，因此最后n的值仍然為10，沒有改變。故應選擇A。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學等領域），建議您咨詢相關領域專業(yè)人士。