单项选择题
有如下程序：
Option Base !
Private Sub Command1_Click()
Dim arr(10)
arr=Array(10,35,28,90,54,68,72,90)
For Each a In arr
If a>50 Then
Sum=Sun+a
End If
Next a
End Sub
运行上述程序时出现错误，错误之处是（ ）。
A．数组定义语句不对，应改为Dim arr
B． 没有指明For循环的终值
C．应在For语句之前增加Sum=0
D．Next a应改为Next