有如下程序:Option Base 1Private Sub Form. Click()Dim arr,SumSum=0alt=Array(1,3,5,7,9,
有如下程序： Option Base 1 Private Sub Form. Click() Dim arr,Sum Sum=0 alt=Array(1,3,5,7,9,11,13,15,17,19) For i=1 To 10 If arr(i)/3=arr(i)\3 Then Sum=Sum+arr(i) End If Next i Print Sum End Sub 程序運(yùn)行后，單擊窗體，輸出結(jié)果為______。
A． 25
B．26
C．27
D．28
正確答案：C解析：Option Base 1表示數(shù)組的下標(biāo)是從1開始的。本題中先定義arr=Array(1,3,5,7,9,11,13,15,17,19)，即a(1)=1,a(2)=3,a(3)=5,a(4)=7,a(5)=9,a(6)=11,a(7)=13,a(8)=15,a(9)-17,a(10)=19，而在循環(huán)語句中就是要求把能被3整除的數(shù)加起來，即4(2)+a(5)+a(8)=3+9+15=27。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。