单项选择题

下列程序运行后会出现错误的提示为______。
Private Sub Command1_Click( )
Dim i As Integer
Dim x
x=Array(2,3,4,5,6,7)
For Each i In x
Print i;
Next i
End Sub

A.数组的下标超界
B.For Each数组的控制变量必须为变体变量
C.关键字Each的位子不对
D.x应该定义成数组