[填空題] 設(shè)有如下程序:Option Base 1Private Sub Command1_Click() Dim arr1 Dim Min As Integ
2021-07-20
[填空題] 設(shè)有如下程序:Option Base 1Private Sub Command1_Click() Dim arr1 Dim Min As Integer, i As Integerarr1 = Array(12, 435, 76, -24, 78, 54, 866, 43) Min = _________For i = 2 To 8If arr1(i)
正確答案:arrA(A) , Min = arrA(i)
參考解析:由于有 Option Base 1 語句,所以數(shù)組下標(biāo)是從 1 開始。本題的功能是查找 8 個(gè)數(shù)中的最小值,首先 使用 Array 語句給數(shù)組賦值,然后把第一個(gè)值賦值給最小值變量,及 Min = arr1(1),然后從第二個(gè)數(shù)開始循 環(huán)與最小值比較,如果比最小值小,則把這個(gè)值賦值給 Min,即 Min = arr1(i)。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。