（33 ） 窗体的左右两端各有 1 条直线 ， 名称分别为 Line1 、 Line2 ； 名称为 Shape1 的圆靠在左边的 Line 1直线上（见图）；另有 1 个名称为 Timer1 的计时器控件，其 Enable 属性值是 True 。要求程序运行后 ，圆每秒向右移动 100 ，当圆遇到 Line2 时则停止移动。
为实现上述功能，某人把计时器的 Interval 属性设置为 1000 ，并编写了如下程序：
Private Sub Timer1_Timer()
For k=Line1.X1 To Line2.X1 Step 100
If Shape1.Left+Shape1.Width＜Line2.X1 Then
Shape1.Left=Shape1.Left+100
End If
Next k
End Sub
运行程序时发现圆立即移动到了右边的直线处 与题目要求的移动方式不符。为得到与题目要求相符的结果，下面修改方案中正确的是
A ）把设计器的 Interval 属性设置为 1
B ）把 For k=Line1.X1 To Line2.X1 Step 100 和 Next k 两行删除
C ）把 For k=Line1.X1 To Line2.X1 Step 100 改为 For k=Line2.X1 To Line1.X1 Step 100
D ）把 If Shape1.Left+Shape1.Width＜Line2.X1 Then 改为 If Shape1.Left ＜Line2.X1 Then