我希望一个LABEL沿着指定的路线移动
应该怎么办呢?
大概意思就是:从起点开始移动
到达一定高度后,停止高度方向的移动,转而向左移动
thisform.label1.top=thisform.label1.top-2

DO CASE
CASE thisform.label1.Top=90
thisform.label1.Left=thisform.label1.Left-30
thisform.label1.Top=90
ENDCASE
我这就是向高度方向停不了啊
一直向上运动
希望大家能给我解答一下
谢谢

thisform.label1.top=thisform.label1.top-2
初始值是多少？每次减少2，会不会有个点上是值=90？
比方说，91-2=89，不满足CASE thisform.label1.Top=90 这个条件，其结果......

初值我是在INIT事件里面设置的
thisform.label1.top=100
thisform.label1.left=100
不知道这样行吗？
QQ:122745406

是不是这样：
CASE thisform.label1.Top=<90
能不能把代码全部发上来，让大家帮你看看，代码不全，只是猜测。

If ThisForm.Label1.Top>=90
ThisForm.Label1.Left=ThisForm.Label1.Left-30
If ThisForm.Label1.Left<=0
*...
Else
*...
EndIf
Else
ThisForm.Label1.Top=ThisForm.Label1.Top+2
EndIf

IF thisform.label1.Top>90
thisform.label1.top=thisform.label1.top-1
ELSE
thisform.label1.Left=thisform.label1.Left-1
IF thisform.label1.Left<60
thisform.label1.Top=thisform.label1.Top+1
ENDIF
ENDIF
我想让它在LEFT=60的时候在向下运动
但是它向上的运动停不了啊
有什么方法可以解决？

Do Case
Case Thisform.label1.Top>90 AND Thisform.label1.Left>60
Thisform.label1.Top=Thisform.label1.Top-1
Case Thisform.label1.Top=90 And Thisform.label1.Left>60
Thisform.label1.Left=Thisform.label1.Left-1
Case Thisform.label1.Left<=60
Thisform.label1.Top=Thisform.label1.Top+1
Endcase