单选题
窗体的左右两端各有1条直线，名称分别为Line1、Line2；名称为Shape1的圆靠在左边的Line1直线上(见图)；另有1个名称为Timer1的计时器控件，其Enabled属性值是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
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
【正确答案】
B
【答案解析】[考点] 计时器和For循环
[解析] 通过计时器控件Timer事件过程可完成有规律性时间间隔执行的任务，本题原代码错误原因在于在周期性运行的Timer事件过程中功能重复地使用了For循环语句。