单项选择题

下列程序运行后会出现错误的提示为________。
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应该定义成数组