同时移动问题
有一个过程MoveControl(objControl as Control,x as single,y as single),实现控件从当前位置逐渐的移动到x,y坐标处(像走过去一样).
现在的问题是当调用多个MoveControl 过程的时候,控件的移动不是同时的,就是说第二个MoveControl执行之前要等第一个MoveControl过程执行结束.
求同步移动方法与思路
注:把所有要移动的控件放在一个容器,然后移动容器这样的方法就不用说了.还有用多个时钟控件实现同时移动也不用说了(因为需要移动的控件数量是变化的,用时钟控件太麻烦)
谢谢!.
[解决办法]
移动步长一样的话这样就好了嘛
dim Item as Control
for x=0 to 3000
For Each Item In Controls
MoveControl Item,Item.Left+1,y
next
next