(26)編寫下列事件過程和函數(shù)過程Private Sub Command1_Click() Dim num(1 TO 6)As Single Num(1)
（26）編寫下列事件過程和函數(shù)過程Private Sub Command1_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 Print p2(6,num()) End Sub Private Function p2(By Val n 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è)人士。