控件名称： YFGif.ocx
源码地址： http://www.bjjr.com.cn/YeFan/SourceCode/YFGif.rar
【属性】：
1、 GifBKColor ：设置背景色
【方法】：
1 、 GifPlay
'********************************************************
'** 函 数 名： GifPlay
'** 输 入： strName(String) - 文件名
'** ： Optional bFlags(Boolean = True) - 播放标志
'** ： Optional intUseDelay(Integer = 0) - 连续播放间隔
'** ： Optional intDelay(Integer = 0) - 帧播放附加间隔
'** 输 出：无
'** 功能描述：开始播放 Gif
'********************************************************
2 、 GifStop
'********************************************************
'** 函 数 名： GifStop
'** 输 入：无
'** 输 出：无
'** 功能描述：停止播放 Gif
'********************************************************
3 、 GifRestart
'********************************************************
'** 函 数 名： GifRestart
'** 输 入：无
'** 输 出：无
'** 功能描述：重新开始播放
'********************************************************
4 、 GifFrame
'********************************************************
'** 函 数 名： GifFrame
'** 输 入： Optional FrameFlag(Boolean = True) - True 显示开始帧
'** 输 入： False 显示结束帧
'** ： Optional Num(Integer = 0) - 帧的序号
'** 输 出：无
'** 功能描述：播放指定帧
'********************************************************
5 、 GetFrameNum
'********************************************************
'** 函 数 名： GetFrameNum
'** 输 入：无
'** 输 出： (Long) - 返回帧号
'** 功能描述：返回帧号
'********************************************************
【事件】：
1 、 Click() 单击
2 、 MouseMove (Button As Integer, Shift As Integer, X As Single, Y As Single)
' 移动
3 、 MouseLeave() ' 离开事件
4 、 MouseDown (Button As Integer, Shift As Integer, X As Single, Y As Single)
' 鼠标按下
5 、 MouseUp (Button As Integer, Shift As Integer, X As Single, Y As Single)
' 鼠标抬起