如何实现在打开网页时右上角出现动态图片就像IE右上角那个图片

Question

各位，我做了个小浏览器。现在让它的右上角加上一个图片，怎样实现当正在打开网站时，它就动起来，网站打开完毕就静止不动？
就像IE右上角的那个图片一样，各位高手请赐教，小菜谢过了~~

Answer 1

放上一个Flash控件,加载一个小动画.

Answer 2

flash
gif
或者放一个imagelist，存入单帧的图像，定时轮流显示。

Answer 3

这个我没试过，不过我想这应该和托盘图标的动态类似吧，给你代码参考：
 *********************************************
' 设置托盘的图标（在本例中没有用到，如果要动态改变托盘内显示的图标，它非常有用）
' 例如：1、显示动画图标（方法你一定猜到了，对！使用Timer控件，不断调用此过程，注意把动画放在pic数组中）
'       2、程序处于不同状态时，显示不同的图标，方法是类似的
' 有兴趣的话试一试吧。
' *********************************************
Public Sub SetTrayIcon(pic As Picture)
    '判断一下pic中存放的是不是图标
    If pic.Type <> vbPicTypeIcon Then Exit Sub    '更换图标为pic中存放的图标
    With TheData
        .HIcon = pic.Handle
        .UFlags = NIF_ICON
    End With
    Shell_NotifyIcon NIM_MODIFY, TheData
End Sub