[多項(xiàng)選擇題] 在考生文件夾下有一個(gè)工程文件sjt3.vbp,相應(yīng)的窗體文件為sjt3.frm。其功能是隨機(jī)產(chǎn)生20個(gè)0~1000的整數(shù),將其放入一個(gè)數(shù)組中,然
[多項(xiàng)選擇題] 在考生文件夾下有一個(gè)工程文件sjt3.vbp,相應(yīng)的窗體文件為sjt3.frm。其功能是隨機(jī)產(chǎn)生20個(gè)0~1000的整數(shù),將其放入一個(gè)數(shù)組中,然后輸出這20個(gè)整數(shù)的平均值。程序運(yùn)行后,單擊命令按鈕(名稱為Command1,標(biāo)題為“輸出平均值”),即可求出其平均值,并顯示在窗體上(如圖所示)。這個(gè)程序不完整,請(qǐng)把它補(bǔ)充完整,并能正確運(yùn)行。
要求:去掉程序中的注釋符,把程序中的改為正確的內(nèi)容,使其實(shí)現(xiàn)上述功能,但不能修改程序中的其他部分。最后將修改后的文件按原文件名存盤。
正確答案:
[解題思路] 表達(dá)式Int(Rnd*A000)可生成0~A000范圍內(nèi)隨機(jī)整數(shù)。根據(jù)題意求出B0個(gè)隨機(jī)整數(shù)的平均值,須用For循環(huán)語句逐一將數(shù)組中的各元素累加到變量Sum,然后求出平均值。[操作步驟] 步驟A:打開本題工程文件。 步驟B:分析并編寫程序代碼。 程序提供代碼 Option Base A Private Sub CommandA_Click( ) Dim arrN(B0) As Integer Dim Aver As Single Dim Sum As Integer, i
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。