VB程序设计,怎样让command按钮在屏幕上移动?
展开全部
Private Sub Command1_Click()
Label1.Move Label1.Left - 100 '左移100单位
End Sub
Private Sub Command2_Click()
Label1.Move Label1.Left + 100 '右移100单位
End Sub
Private Sub Command3_Click()
Label1.Move Label1.Left, Label1.Top - 100 '上移100单位
End Sub
Private Sub Command4_Click()Label1.Move Label1.Left, Label1.Top + 100 '下移100单位
End Sub
Private Sub Command5_Click()
End
End Sub
以上是通过单击命令按钮上、下、左、右移动一个标签的代码,移动按钮控件基本也这样,稍微变通就行了
Label1.Move Label1.Left - 100 '左移100单位
End Sub
Private Sub Command2_Click()
Label1.Move Label1.Left + 100 '右移100单位
End Sub
Private Sub Command3_Click()
Label1.Move Label1.Left, Label1.Top - 100 '上移100单位
End Sub
Private Sub Command4_Click()Label1.Move Label1.Left, Label1.Top + 100 '下移100单位
End Sub
Private Sub Command5_Click()
End
End Sub
以上是通过单击命令按钮上、下、左、右移动一个标签的代码,移动按钮控件基本也这样,稍微变通就行了
展开全部
改变其Left、Top属性即可,或者用Move方法
更多追问追答
追问
写一下那个代码嘛
追答
你光说移动,没说怎么移动,移动多少,怎么写代码???
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
.net用command的 Location属性,赋值X,Y绝对坐标,或偏移量
VB6 同样直接定义top,left的值即可
VB6 同样直接定义top,left的值即可
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询