名叫雷锋不用谢
if thisform.label1.left<=thisform.width
thisform.label1.left=thisform.label1.left+5
else
thisform.label1.left=0-thisform.label1.width
endif
用计时器