我的GIF动画怎么是静止的啊!!

Question

本来就应该是静止的，如果要动态的，用WebBrower控件载入

Answer 1

picturebox和image只显示gif的第一帧
当然就是静止的了象thirdapple所说的,可以用webbrower控件
如果对图像效果要求比较高的话,可以从网上招其他控件

Answer 2

只能显示第一桢，所以是静止的。
要显示gif动画，可以用webBrowser控件
WebBrowser1.Navigate "c:\name.gif" 
或用第三方控件：http://www.leyoo.com/vbgood/download/widget/vbanigif.zip 

Answer 3

还有啊~~~~~我刚才看了一下我的VB,好象有那个ANIGIF的控件啊!
怎么使用啊?能举个咧子吗??我在我的VB里没有看到WEBBROWSER的控件啊!
这是怎么回事啊????

Answer 4

怎么使用啊?能举个咧子吗??我在我的VB里没有看到WEBBROWSER的控件啊!
这是怎么回事啊????

Answer 5

好了!
我现在知道如何用它显示GIF文件了!但用WEBBROWSER图片旁边就有滚动条,如何去掉那些啊?怎么设置参数??谢谢!

Answer 6

根本不需要用第三方控件！你可以通过工具把Gif动画文件分开成若干帧，再把它导入到资源文件中。在程序中用Timer1来调用它。
1）：资源文件的写法：（假设有四帧，分别为1.bmp、2.bmp、3.bmp、4.bmp)
    100 bitmap 1.bmp
    200 bitmap 2.bmp
    300 bitmap 3.bmp
    400 bitmap 4.bmp
（具体的生成和添加资源文件的步骤我就不罗嗦了）
2）：代码：
在通用中设置：Dim wch As Integer
'需要在窗体上添加Image1和Timer1两个控件
Private Sub Form_Load()
Image1.Picture = LoadResPicture(100, vbResBitmap)
wch= 100
End SubPrivate Sub Timer1_Timer()
'别忘记了要设置时间的Interval属性
wch = 100 + wch
    If wch > 400 Then wch = 100
       Image1.Picture = LoadResPicture(wch, vbResBitmap)
End Sub