Question

VB中怎么让图片横向移动

用timer怎么写程序啊？

Answer 1

[对象名.]Move Left[,Top[,Width[,Height]]]
Move后的参数表示对象移动之后的位置（Left,Top)及大小（Width,Height)

图片横向移动：Image1.move image1.left ± 100

Answer 2

'加一个command5，按一次右移150
Private Sub Command5_Click()
Image1.Left = Image1.Left + 150
End Sub

'加一个command4，按一次左移150
Private Sub Command4_Click()
Image1.Left = Image1.Left - 150
End Sub