求vb中图片停止移动代码？

图片随着时间向上移动，在到达另一个图片下端的时候图片自动停止移动，求实现这个个事件的代码？

假设界面上有2个picture控件。上下排列。分别装载2个图片。要想实现你的需求那么就要先在界面上添加一个timer控件。Interval属性设置为你需要移动的时间间隔单位为毫秒。

然后双击timer控件进入编程界面。添加如下代码(假设上面的picture控件为pic1下面的为pic2)

if pic2.top <= pic2.top+pic2.height then

timer1.enabled=false

end if

判断条件的意思为如果pic2的上边缘到达pic1的下边缘(pic1的上边缘+pic1的高度)则停止timer执行

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息