看体上有一个名称为Timer1的计时器控件，一个名称为shape1的形状控件，其Sh

问题：

看体上有一个名称为Timer1的计时器控件，一个名称为shape1的形状控件，其Shape属性值为3(Cirele)。编写程序如下：

Private Sub Form_Load()

Shape1.Top=0

Timer1.Interval=100

End Sub

Private Sub Timer1_Timer()

Static x As Integer

Shape1.Top=Shape1.Top+100

x=x+1

If x Mod 10=0 Then

Shape1.Top=0

End If

End Sub

以下关于上述程序的叙述中，错误的是（）。

A．每执行一次Timer1_Timer事件过程，x的值都在原有基础上增加1

B．Shape1每移动10次回到起点，重新开始

C．窗体上的Shape1由下而上移动

D．Shape1每次移动100