[填空題] 如果存在如下過(guò)程: Private Function FMaxla() As Integer) Dim First As Integer,Las
2021-07-20
[填空題] 如果存在如下過(guò)程:
Private Function FMaxla() As Integer)
Dim First As Integer,Last As Integer,i As Integer
First=LBound(a)
Last=UBound(a)
Max=a(First)
For i=First To Last
If a(i)>Max Then Max=a(i)
Next i
FMax=Max
End Function
在窗體上添加一個(gè)命令按鈕,然后編寫(xiě)如下事件過(guò)程:
Private Sub Command_Click()
ReDim m(1 To 4)As Integer
m(1)=20:m(2)=30:m(3)=50:m(4)=100
C=FMax(m)
Print C
End Sub
單擊命令按鈕,其輸出結(jié)果為 (8) 。
正確答案:100
參考解析:首先需要分析Fmax函數(shù)的數(shù)學(xué)意義,不難發(fā)現(xiàn)是尋找數(shù)組中的最大值。Fmax函數(shù)調(diào)用參與運(yùn)算的參數(shù)是數(shù)組m,那么輸出值為m數(shù)組中最大值m(4)=100。
詞條內(nèi)容僅供參考,如果您需要解決具體問(wèn)題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。