VB怎么使用timer让label控件在窗口里面自由移动
就是怎么使用timer让label在from的框里面随机移动?不能移出框你要告诉我具体怎么操作呀...
就是怎么使用timer让label在from的框里面随机移动? 不能移出框
你要告诉我具体怎么操作呀 展开
你要告诉我具体怎么操作呀 展开
3个回答
展开全部
代码:
dim ix as integer
dim iy as integer
ix=round(rand(me.width)*me.width,0)
if ix+label1.width>me.width then ix=ix-label1.width
iy=round(rand(me.height)*me.height,0)
if iy+label1.height>me.height then iy=iy-label1.height
label1.move ix,iy
将上面的代码放置在timer的事件中。
dim ix as integer
dim iy as integer
ix=round(rand(me.width)*me.width,0)
if ix+label1.width>me.width then ix=ix-label1.width
iy=round(rand(me.height)*me.height,0)
if iy+label1.height>me.height then iy=iy-label1.height
label1.move ix,iy
将上面的代码放置在timer的事件中。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询