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