我想用VB制作一个动画，主要是10个图片。分别命名为1.jpg 2.jpg …… 10.jpg ，建立一个picturebox，需要达到的效果就是在此Picturebox框中10个图片实现每0.5秒自动切换，从1到2再到3，然后一直到最后10.
希望各位朋友不吝赐教，本人万分感激！

答案或建议：

在窗体添加一个timer控件，把interval属性设为500，切换到代码编写区，写入以下代码：
Dim i As Integer

Private Sub Form_Load()
i = 1
End Sub

Private Sub Timer1_Timer()
Picture1.Picture = LoadPicture("XX路径\" & i Mod 10 & ".jpg")
i = i + 1
If i > 10 Then i = i Mod 10
End Sub
文章出自：http://www.baikewenda.com/tech/dev/7/6/a142202925.htm