Question

怎样在VB中添加一个command按钮向上移动图像

今天上VB课，老师留的作业不会做，哪位大神赐教啊
作业：
实验内容：　
（1）放四个按钮，分别显示为“向左”，“向右”，“向上”，“向下”，利用Top、Left属性，利用以上按钮控制图像向左，向右，向上，向下移动。

Answer 1

Private Sub Command1_Click()

Picture1.Left = Picture1.Left - 50

End Sub

Private Sub Command2_Click()

Picture1.Left = Picture1.Left + 50

End Sub

Private Sub Command3_Click()

Picture1.Top = Picture1.Top - 50

End Sub

Private Sub Command4_Click()

Picture1.Top = Picture1.Top + 50

End Sub

Answer 2

private sub form_load()
command1.caption="向右"
command2.caption="向左"
command3.caption="向下"
command4.caption="向上"
end sub
private sub command1_click()
Image1.left = Image1.left + 50
end sub
private sub command2_click()
Image1.left = Image1.left - 50
end sub
private sub command3_click()
Image1.top = Image1.top + 50
end sub
private sub command4_click()
Image1.top = Image1.top - 50
end sub

Answer 3

command1.left=command1.left + 10
相当于按钮的X坐标+10，就是右移，左移就是-10，Top也一样。