你想在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动画了。(注意:编译以后的可执行文件不包含动画文件)如果动画里加上动态按钮，配合鼠标位置判断，就可以作成动态工具条或动态菜单了。->
文章整理：西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!
