vb.net实现控件自由移动
就是说控件可以水平运动,垂直运动,还有坐标的对角运动,要有运动过程,不能瞬间移动过去,像魔兽那样人物移动。...
就是说控件可以水平运动,垂直运动,还有坐标的对角运动,要有运动过程,不能瞬间移动过去,像魔兽那样人物移动。
展开
1个回答
展开全部
Dim i As Integer
For i = 0 To Me.Width - Button1.Width 'me为容器,典型的是form1
Button1.Left += 1
Windows.Forms.Application.DoEvents()
Next
原理:不断地变化button1的X轴,使其向右移,同样,只要控制好其x,y轴,就可以变化button的变化
如果是做小游戏,建议弄成类吧,把其中的左(右)移或对角其它移动弄成其接口,以便操作。
由于涉及内容太多,不再详述。原理都一样
For i = 0 To Me.Width - Button1.Width 'me为容器,典型的是form1
Button1.Left += 1
Windows.Forms.Application.DoEvents()
Next
原理:不断地变化button1的X轴,使其向右移,同样,只要控制好其x,y轴,就可以变化button的变化
如果是做小游戏,建议弄成类吧,把其中的左(右)移或对角其它移动弄成其接口,以便操作。
由于涉及内容太多,不再详述。原理都一样
追问
不是我想要的,我自己的代码已经可以实现了,但是移动太快,而且有时候会跳,我想要更好的代码,更好的方法,呵呵
追答
上面稍加代码即可变慢:
1、step 步伐弄小,例 0.5 ,或者更小;
2、加入延迟
application.doevents()
threading.thread.sleep(150)
这样即可防假死,又不影响其它运行,还达到变慢目的
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询