[单项选择题] 有如下程序： Option Base 1 Private Sub Form

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

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 arE(i)/3=arr(i)3 Then

Sum=Sum+arr(i)

End If

Next i

Print Sum

End Sub

程序运行后，单击窗体，输出结果为______。

A．25

B．26

C．27

D．28

C解析：[分析]： 本题考查的是数组赋值以及算术运算符“/”和“”的区别。本程序段首先用Array函数给arr数组赋初值。“/”是浮点除法，执行标准除法操作，结果为浮点数。“”为整数除法，整型整除运算，结果为整型值。本程序的功能是：找出arr数组中能被3整除的元素值，将其累加到sum中，然后输出。满足该条件的元素是3、9、15，和值为27。