[单选题]

阅读程序: Option Base 1 Private 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 Next i Print Sum End Sub 程序运行后,单击窗体,输出结果为

A.13

B.14

C.27

D.15

参考答案与解析:

相关试题

阅读程序:Option Base 1Private Sub Form. Clic