@@如何在vb显示gif动画图片！！

显示GIF图片用PICTURE BOX就可以
显示进度条：
1，可以使用PROGRESS BAR控件
2，可以放置两个同样的控件（比如IMAGE1和IMAGE2），让他们的位置完全重叠，将其中一个置前加载图片作为进度条显示的图片，另一个设置STYLE属性后放置在后方，再在TIMER控件中改变作为进度条的IMAGE的WIDTH属性即可

有不懂的再HI我

在VB6.0中实现GIF动画的几种方法

888ai444

是否觉得你的程序有些死气沉沉?加一个小动画试试吧,它也许会给你的程序增色不少呦!
用VB实现的动画并不象大家想象中的那种声光效果极佳,人物、事物动感十足的动画。用VB实现的动画可以说成是会动的图画，简单的说就是把一堆图片依次的、循环的、按一定的速度连续显示出来,从而产生一种会动的感觉。当然这一堆图片不一定是GIF格式的,只不过GIF文件的压缩比大一般称为”无损压缩文件”,文件较小更适合于动画,如果你高兴也可以使用BMP、JPG等格式的文件。
在对GIF动画有了一定了解之后我们就来讨论一下如何在VB程序中实现GIF动画。
第一种方法: 用图像框 (IMAGEBOX)按一定的时间,顺序循环加载图片。这种方法需要用到TIMER控件，因为TIMER控件不会影响FROM_LOAD等其他程序的运行,也不受其他程序的影响,所以为首选。图像框(IMAGEBOX)的STRETCH属性设置为TRUE使图片大小适应控件大小,将准备好的图片依次命名为1.GIF、2.GIF、3.GIF……TIMER的INTERVAL属性设置为100(视情况而定)。在TIMER1_TIMER()中加入以下代码：
PRIVATE SUB TIMER1_TIMER()
DIM FILENAME AS STRING
STATIC INT AS INTEGER
INT = INT + 1
FILENAME = “ C:\WINDOWS\DESKTOP\” & INT & “.GIF” ‘路径应视情况而定
IMAGE1.PICTURE = LOADPICTURE(FILENAME)