急求VB程序代码解释

'计时器1
Private Sub Timer1_Timer()
'如果Shape1 Y轴座标大于500象素
If Shape1.Top >= 500 Then
Shape1.Top = Shape1.Top - 200 '不断向上移动200象素
Else
Timer1.Enabled = False '停掉计时器1的动作
Timer2.Enabled = True '开启计时器2
End If
End Sub

'计时器2
Private Sub Timer2_Timer()
If Shape1.Top <= 1000 Then
Shape1.Top = Shape1.Top + 200 '不断向下移动200象素
Else
Timer1.Enabled = True '开启计时器1的动作
Timer1.Enabled = False '停掉计时器2
End If
End Sub

感觉逻辑乱了 应该是大于500向下移动 大于1000向上移动，另外移动的操作不应该在这里操作的 应该运用数学上的 *-1 来进行 负负得正 负正得负的取反操作 控制方向的转换

T1：
如果超过制定的顶端500就减少200，否则，T1停止，T2开始，
T2；
如果顶端距离小于等于1000就加200否则，T1开始，T2停止