2个回答
展开全部
可以添加一个timer 设置Interval=10000 ‘10秒
在timer里面添加代码即可
Private Sub Timer1_Timer()
Picture1.Top = Picture1.Top + 10
Picture1.Left = Picture1.Left + 10
End Sub
在timer里面添加代码即可
Private Sub Timer1_Timer()
Picture1.Top = Picture1.Top + 10
Picture1.Left = Picture1.Left + 10
End Sub
更多追问追答
追问
我试试
追答
你把时间间隔改短点,改为1S 也就是Interval=1000
Private Sub Timer1_Timer()
Picture1.Top = Picture1.Top + 100
Picture1.Left = Picture1.Left + 100
End Sub
这样就明显点
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
搜一下:vb令图片10秒随即移动一下是什么代码
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询