有如下程序: Option Base 1 Private Sub Form_Cl
问题:
有如下程序:
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