在vb里怎样做一个移动窗体
展开全部
放一块表（timer控件）在窗体上，
然后粘贴如下代码看看效果
Private Sub Form_Load()
Timer1.Enabled = True
Timer1.Interval = 1000
End Sub
Private Sub Timer1_Timer()
If Me.Left > 0 Then
Me.Left = Me.Left - 100
End If
End Sub
然后粘贴如下代码看看效果
Private Sub Form_Load()
Timer1.Enabled = True
Timer1.Interval = 1000
End Sub
Private Sub Timer1_Timer()
If Me.Left > 0 Then
Me.Left = Me.Left - 100
End If
End Sub
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
不知你要怎样移动，鼠标移动的话参考我的文档：
http://wenku.baidu.com/view/12e13f7af242336c1eb95ed7.html
http://wenku.baidu.com/view/12e13f7af242336c1eb95ed7.html
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
