阅读程序： Option Base 1 Private Sub Form_C

问题单项选择题

阅读程序： 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 10If 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

答案

参考答案：C

解析：解析：分析题干，arr(i)/3=arr(i)\3是求出数组中能整除3的元素，而 Sum=Sum+arr(i)是将这些元素相加，也就是求3+9+15的值为27，所以选项C)正确。