Question

VB中如何使用timer自动播放image中的图片？

如何利用vb中的timer实现多张图片的排序？？ 谢谢啊

Answer 1

Private Sub Form_Load()
Timer1.Interval = 2000
Timer1.Enabled = True

End Sub

Private Sub Timer1_Timer()
Static i As Integer
i = i + 1
Image1.Picture = LoadPicture("c:\" & i & ".jpg")

If i > 3 Then i = 0

End Sub