[單項(xiàng)選擇題] 有如下程序： Option Base 1 Pfivate Sub Form_Click() Dim arr,Sum Sum=0
2021-07-20
[單項(xiàng)選擇題] 有如下程序：
Option Base 1
Pfivate Sub Form_Click()
Dim arr,Sum
Sum=0
arr=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
Nexti
print Sum
End Sub
程序運(yùn)行后，單擊窗體，輸出結(jié)果為( )。
A．25
B．26
C．27
D．28
正確答案：C
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。