If命令1。Caption = "left "然後
如果Label1。Left & lt那麽= 0
命令1。Caption = "右"
其他
Label1。左= Label1。左- 120
如果…就會結束
ElseIf命令1。Caption = "right "那麽
如果Label1。Left & gt= Form1。寬度標簽1。寬度呢
命令1。Caption = "Left "
其他
Label1。左= Label1。左+ 120
如果…就會結束
如果…就會結束
末端接頭
試試看。如果妳覺得動作慢，就把數字改壹點。