[單項選擇題] 編寫下列事件過程和函數(shù)過程： Private Sub Commandl Click() Dim num(1 To 6)As Singlenu
2021-07-20
[單項選擇題] 編寫下列事件過程和函數(shù)過程：
Private Sub Commandl Click()
Dim num(1 To 6)As Single
num(1)=103:num(2)=190:num(3)=0
num(4)=32:num(5)=-56:num(6)=100
Print p2(6,num())
End Sub
Private Function p2(ByVal n As Integer,number()As Single)As Integer
p2=number(1)
For j=2 To n
If number(j)＜p2 Then p2=number(j)
Next j
End Function
程序運行后，在窗體上輸出( )。
A．-56
B．0
C．103
D．190
正確答案：A
參考解析：分析程序，函數(shù)p2的作用是找出指定數(shù)組中最小的數(shù)并返回。p2函數(shù)指定第1個參數(shù)以傳值的形式傳遞，第2個參數(shù)以傳地址的形式傳遞。因此，在命令按鈕單擊事件中調(diào)用函數(shù)p2時，參數(shù)6是以傳值的形式傳給形參n，數(shù)組num以傳地址的形式傳給形參number。所以題中整個程序要實現(xiàn)的功能是找出數(shù)組num中最小的數(shù)并輸出，因此最后輸出-56。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。