(35)有下列程序代碼實現(xiàn)生成20個0－100之間的隨機整數(shù),存于數(shù)組中,打印數(shù)組中大于50的數(shù),并求這些
（35）有下列程序代碼實現(xiàn)生成20個0-100之間的隨機整數(shù)，存于數(shù)組中，打印數(shù)組中大于50的數(shù)，并求這些數(shù)的和。請選擇正確的程序段 ，完成程序。 Private Sub Commandl_Click() Dim arr(1 To 20) For i=1 To 20 arr(i)=________ Text1.Text=Text1.Text&arr(i)&Chr(13)&Chr(10) Next i Sum=0 For Each X________ If X>50 Then Print Tab(20)；X Sum=Sum+X End If Next X Print Tab(20)；"Sum="；Sum End SubA.Int(Rnd*99+1) In arr B.Int(Rnd) In arr C.Int(Rnd*99+1) In arr() D.Int(Rnd) In arr()
正確答案：A【解析】Rnd函數(shù)用于產(chǎn)生一個小于1但大于或等于0的實數(shù)，題中要求0-100之間的隨機整數(shù)，所以需要對Rnd產(chǎn)生的實數(shù)進行計算處理Int(Rnd*99+1)。要處理數(shù)組中的元素，使用For Each…Next語句處理數(shù)組元素時，Each后只需寫出數(shù)組名，不能使用小括號。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。