我7月18日发帖“用户控件制作实例与讲解（上）”的附件中有一个“图片显示特技控件”源代码，这个控件中就有图片从左至右显示到图片框，你只要稍微修改一下：当一张图片显示完后，接着调入另一张图片同样显示就行了。附件地址：http://bbs.pfan.cn/post-280808.html

能在说的详细点吗!!

1.首先把附件下载到你的机器上。
2.解压缩。
3.找到“4图片特技”文件夹并打开文件夹。
4.点击“组1.vbg”文件。
5.定位到窗体代码页。
6.对以下过程进行修改：

Private Sub Form_Load()
i=1
PicStunt1.Interval = 100
PicStunt1.Picture = LoadPicture(App.Path & "\1.JPG")'全路径图片文件名
End Sub

Private Sub PicStunt1_Done()
i = i + 1
PicStunt1.Picture = LoadPicture(App.Path & "\" & i & ".jpg")'全路径图片文件名
if i=32766 then i=0 '假设你有32766张图片
开始_Click
End Sub

Private Sub 开始_Click()
PicStunt1.Start 2
End Sub


7.另外，你要把所有图片改名，以连续升序的数字做为文件名，例如 1.jpg、2.jpg、3.jpg....32766.jpg