扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
在窗体的load事件里面写代码；
“只有客户发展了，才有我们的生存与发展！”这是创新互联的服务宗旨！把网站当作互联网产品，产品思维更注重全局思维、需求分析和迭代思维，在网站建设中就是为了建设一个不仅审美在线，而且实用性极高的网站。创新互联对成都做网站、网站制作、成都外贸网站建设、网站制作、网站开发、网页设计、网站优化、网络推广、探索永无止境。
代码大致是这样的：
p.top=p.top-x
这里p是你放图片的那个容器名字，x是你每次的移动量；
如果你想让它持续移动，就添加一个timer，在load事件里面打开timer，在timer事件里面写上面的代码；
不是语言让图片动起来的，而是图片本身就能动，例如gif格式图片本身就是动画。如果你讲的是图片在网页上移动，而不是图片本身内容的动作，那么不是vb.net的功能必须用java脚本来实现。
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode Image1.Tag Then '第二次按下某键可以不执行语句
Select Case KeyCode
Case 37 '左
Image1.Picture = LoadPicture("C:\图片A.jpg")
Image1.Left = Image1.Left - 50
Case 38 '上
Image1.Picture = LoadPicture("C:\图片C.jpg")
Image1.Top = Image1.Top - 50
Case 39 '右
Image1.Picture = LoadPicture("C:\图片B.jpg")
Image1.Left = Image1.Left + 50
Case 40 '下
Image1.Picture = LoadPicture("C:\图片D.jpg")
Image1.Top = Image1.Top + 50
End Select
Image1.Tag = KeyCode
End If
End Sub
Private Sub Form_Load()
Image1.Tag = 1
End Sub
Private Sub Command1_Click()
Image1.Top = Image1.Top - 50 '图片向上移动50
Image1.Left = Image1.Left - 50 '图片向左移动50
End Sub
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网