Question

怎样在vb的一个图像框中，每按一次命令按钮依次按顺序显示不同的图片？求代码

老师们：图片以10张为例吧。谢谢!

Answer 1

假设有10个图片文件，文件名分别为：0.jpg 1.jpg 2.jpg 3.jpg 4.jpg ... 9.jpg

Private Sub Command1_Click()
Static i As Integer
Image1.Picture = LoadPicture(App.Path & "\" & i & ".jpg")
i = (i + 1) Mod 10
End Sub