Flash是一种矢量格式的动画文件,可以包含动画,声音,超文本链接,而文件的体积却很小。在网页上使用Flash可以作出很漂亮的全屏动画和动态菜单条。
你想在VB程序里作出类似的效果吗?在VB中使用Flash4自带的Swflash.ocx控件就可以了。方法如下:
首先,打开VB5,新建一个工程,在工具箱上单击右键,选择部件,在部件窗口的控件列表中选择Shockwaveflash,然后确定,Flash控件就被加到工具箱上。
然后将Flash控件放到窗体上,并调整至适当的大小,然后在属性窗口里设置movie属性为Flash动画文件的路径(如:c:\demo.swf),设置scalemodel属性为2,quality属性为1。
双击窗体,在form_load()过程里加入:
shockwaveflash1.playing=true
按F5就可以看到播放的Flash动画了。(注意:编译以后的可执行文件不包含动画文件)如果动画里加上动态按钮,配合鼠标位置判断,就可以作成动态工具条或动态菜单了。->