bv里面的image如何对鼠标左右键分别相应

[andylauren]

我是一个初学者，现在想能对图片进行操作，比如，左键点击图片换成下一张，点右键让图片变成上一张，现在的图片无论怎么点击都是一个效果，没找到右键响应的函数，请高手指教，谢谢！！！！

[andylauren]

请教高手哦，急求啊

[fzx4936]

bv是什么呢?

Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Select Case Button
    Case 1
        Picture1.Picture = LoadPicture("1.jpg")
    Case 2
        Picture1.Picture = LoadPicture("2.jpg")
End Select
End Sub

大概就是这样吧

[andylauren]

谢谢，就是这个，bv是打字打错了