VB中如何加入GIF动画、

这种方法需要用到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 STRINGSTATIC INT AS INTEGERINT = INT + 1FILENAME = “ C:\WINDOWS\DESKTOP\” &INT &“.GIF” ‘路径应视情况而定IMAGE1.PICTURE = LOADPICTURE(FILENAME)IF INT >= 5 THEN INT = 0 ‘条件INT到底应大于几应视情况而定END SUB第二种情况：用PICTURECLIP控件实现。PICTURECLIP控件要在“部件”中添加，并且要与PICTURE和IMAGE控件配套使用。右键单击PICTURECLIP使用属性中的”自定义”—加载图片—”通用属性”—定义”行,列”值(行,列值在此例中暂定为18)。程序代码如下：DIM A AS INTEGERPRIVATE SUB form_LOAD ()PICTURE1.PICTURE = PICTURECLIP.GRAPHICCELL(1)A = 1TIMER1.INTERVAL = 100END SUBPRIVATE SUB TIMER_TIMER ()A = A + 1 ：IF A = 18 THEN A = 0PICTURE1.PICTURE = PICTURECLIP.GRAPHICCELL(A)END SUB此种方法是将一张图片分割为几行、几列然后依次将每一部分显示出来，所以准备的这一图片最好是每隔一定行距列距有一个独立的内容的图案，如果是一个连续的、整体的图案那么出来的效果就只会”动”而不成”画”了。第三种方法：现在市面上有很多制作GIF动画的软件，如有一个叫GIF CONSTRUTION SET 的 SHAREWARE (32位)可以很容易得制作出动态的GIF图形文件，我们可以用VB中的ANIGIF控件来”播放”已做好的GIF图片。其属性设置位要播放的GIF文件名，在程序运行时控件会自动播放GIF动画。当然ANIGIF控件要在”部件”里添加后才能使用。此种方法不用很多的代码而效果也不错(因为在制作GIF动画时一般都有预览功能)因此建议大家使用这种方法。以上是本人在编程中总结出的几点经验仅供大家参考，还望大家多揣磨、多实践总结出更好的方法

1、html中可以用img标签插入图片也可以用css的background插入。具体方法是首先新建一个html文件，里面新建两个div标签，第二个标签中插入img标签并插入图片：

2、然后在上方的style标签中设置第一个div的样式，先给div长度和高度，接着是用background属性引入图片，设置图片不重复以及图片的显示位置j即可：

3、最后打开浏览器就可以看到用两种方法引入的gif的图片了：

例子：利用WebBrowser控件'百度HI群_飞度编程学社1195277Private Sub Form_Load()

WebBrowser1.Navigate "D:\111.gif"

End Sub

添加Gif可以有以下几种方法

(1)利用第三方控件,如Gif89.但好用的一般要注册收钱.

(2)利用WebBrowser控件 在 部件->控件中 选中Microsoft Internet Controls 然后在代码中用WebBrowser1.Navigate xxx\xxx\xxx.gif加入要播放的Gif

(3)将Gif转换为Swf再用Flash播放器播放

这里先说这几种,其他的方法相信在你的学习应用中会发现的.

---