请帮我写一个VB中用Move方法上下左右移动图片的代码
展开全部
Private Sub Command1_Click()
Picture1.Move Picture1.Left + 100 '右移
End Sub
Private Sub Command2_Click()
Picture1.Move Picture1.Left - 100 '左移
End Sub
Private Sub Command3_Click()
Picture1.Move Picture1.Left, Picture1.Top + 100 '下移
End Sub
Private Sub Command4_Click()
Picture1.Move Picture1.Left, Picture1.Top - 100 '上移
End Sub
Picture1.Move Picture1.Left + 100 '右移
End Sub
Private Sub Command2_Click()
Picture1.Move Picture1.Left - 100 '左移
End Sub
Private Sub Command3_Click()
Picture1.Move Picture1.Left, Picture1.Top + 100 '下移
End Sub
Private Sub Command4_Click()
Picture1.Move Picture1.Left, Picture1.Top - 100 '上移
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询