VB里面插入gif动画图片，怎么让她在执行的时候动起来？

Question

RT插入了一张GIF本来是动画的背景图，可是放到VB里她就不动了。怎么办？

Answer 1

如果你非要用PictureBox控件或Image控件或窗体的背景图片来显示动的图片，可以考虑用Timer控件使每隔一定的时间就更改一次控件的Picture属性来切换控件的图片以达到动画的效果。这个方法很奇特，不是吗？首先要用Gif编辑软件将Gif图片中的一个个小图片另存到“C:\新建文件夹\”中，并依次重命名为0.gif、1.gif、2.gif……然后写代码：
Dim i As Integer

Private Sub Timer1_Timer()
On Error Goto Err
url = "C:\新建文件夹\" & i & ".gif"
Me.Picture = LoadPicture url
i = i + 1
Exit Sub
Err:
i = 0
Exit Sub
End Sub

Answer 2

在工程，部件里，找，Microsoft Internet control 前面打钩，就可以用webbrower这个控件了，调用方式是，webbrower1.navegate （），括号里填路径就可以了

Answer 3

VB不支持动态GIF图片的动画。需要用其他控件

追问

我勾了gif89a了，怎么还不行？

追答

VB可以加载BMP、JPG、GIF图片，但GIF图片不能实现动态效果。

追问

那好吧，SWF动画可以加载吗？

Answer 4

有个GIF控件 好像是GIFINI吧 你下来试试