vb中如何播放flash?

Question

有一个flash的插件，可以使用，名字我忘了。

Answer 1

请给查一下，我用shockwave flash、shockwave activex control试了试，可不知道怎么设置参数？

Answer 2

With ShockwaveFlash1
    .Movie = "C:\Program Files\Real\RealOne Player\Firstrun\320x180_2.swf"
    .Play
End With

Answer 3

With ShockwaveFlash1
    .Movie = "C:\Program Files\Real\RealOne Player\Firstrun\320x180_2.swf"
    .Play
End With这算什么啊？？？？

Answer 4

thank !
how to set the  other parameters?
plese help me again.

Answer 5

你想在VB程序里作出类似的效果吗?在VB中使用Flash4自带的Swflash.ocx控件就可以了。方法如下：
　　首先，打开VB5，新建一个工程， 在工具箱上单击右键，选择部件，在部件窗口的控件列表中选择Shockwave flash，然后确定，Flash控件就被加到工具箱上。
　　然后将Flash控件放到窗体上，并调整至适当的大小，然后在属性窗口里设置movie属性为Flash动画文件的路径(如:c:\demo.swf)，设置scale model属性为2，quality 属性为 1。(参见附表)
　　双击窗体，在form_load( )过程里加入：
　　shockwaveflash1.playing=true
　　按F5就可以看到播放的Flash动画了。(注意:编译以后的可执行文件不包含动画文件)如果动画里加上动态按钮，配合鼠标位置判断，就可以作成动态工具条或动态菜单了。 

Answer 6

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