万能百科  > 计算机   > 

[单项选择题] 有如下程序: Option Base 1 Pfivate Sub Form_Click()  Dim arr,Sum  Sum=0  

2021-07-20   

[单项选择题] 有如下程序:

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

程序运行后,单击窗体,输出结果为( )。

A.25

B.26

C.27

D.28

正确答案:

C

词条内容仅供参考,如果您需要解决具体问题
(尤其在法律、医学等领域),建议您咨询相关领域专业人士。

标签