高手帮帮我5555555555(页 1) - VFP论坛

raulcrystal 发表于 2008-5-14 19:38

高手帮帮我5555555555

我用的VF9.0我想用timer让label自动随着时间动起来，而且到达form的最宽时能自动返回到来原来的位置，依次重复下去，哪位大哥会啊，我急切需要！！！！！！！
我打的代码入下显示有误，
accept "thisform.label1.left=0-121" to a,"thisform.label1.top=60" to b
if a="121",b="60"
      thisform.label1.Left=thisform.label1.Left-5
  else a="0,b="60"
      a="121",b="60"
endif

Tiger5392 发表于 2008-5-14 20:43

程序写在Timer1.Timer里
ThisForm.Label1.Left=Iif(ThisForm.Label1.Left<=0,ThisForm.Width,ThisForm.Label1.Left-5)
另外设置ThisForm.Timer1.InterVal=200&&要快点可以设置小点，否则就大点

raulcrystal 发表于 2008-5-14 21:37

程序写在Timer1.Timer里

能用IF函数或者DO CASE打吗

Tiger5392 发表于 2008-5-14 21:40

多余一问。能。

页: [1]