請問VB的方向移動問題....

Question

小弟在學VB,有個題目是
讓怪獸網右邊移動,當超出表單的時候,會自動從左邊出現
程式碼如下:
Private Sub Timer1_Timer()
Image1.Left = Image1.Left + 200
If Image1.Left > Form1.Width Then
Image1.Left = -Image1.Width
End If
End Sub
但是小弟改寫成網左邊移動的時候...
確怎麼寫也寫不出來,他就是不會從右邊表單出現...
麻煩請各位高手指教XD

Answer 1

Private Sub Timer1_Timer()    '向右移是+200那向左移就-200    Image1.Left = Image1.Left - 200    '當Left=0時,Image1就在最左側,但整個都還看得見,直到移至Left<-Image1的寬度時,才將其移至表單的最右邊     If Image1.Left < -Image1.Width Then       'ScaleWidth是表單工作區的寬度,比用Width還適當       Image1.Left = Form1.ScaleWidth    End IfEnd Sub

Answer 2

請問可以稍微解釋一下嗎...XD