窗体的左右两端各有一条直线，名称分别为Line1、Line2；名称为Shape1的圆靠在左边的Line1直线上，如下图所示；另有一个名称为Timer1的计时器控件，其Enable属性值是True。要求程序运行后，圆每秒向右移动100，当圆遇到Line2时则停止移动。

为实现上述功能，某人把计时器的Interval属性设置为1000，并编写了如下程序：

运行程序时发现圆立即移动到了右边的直线处，与题目要求的移动方式不符。为得到与题目要求相符的结果下面修改方案中正确的是（　　）。

A.把设计器的Interval属性设置为1

B.把Fork=Line1.X1ToLine2.X1Step100和Nextk两行删除

C.把Fork=Line1.X1ToLine2.X1Step100改为Fork=Line2.X1ToLine1.X1Stepl00

D.把IfShape1Left+Shape1.Width<Line2.X1Then改为IfShape1.Left<Line2.X1Then