急，如何用Flash与VB程序进行通讯

[hepig2003]

我们软件的启动界面要嵌入一个flash动画，其中包含一些flash的活动按钮。现在的目的是点活动按钮那么就进入下一个界面。问问各位高手，如何实现flash中的按钮与VB程序通讯的这一个功能。究竟是必须用flash实现还是VB中的控件也有解决的办法

[hepig2003]

我现在没有手机，我只需要flash按钮被点后如何向VB程序抛出事件的一段实现代码就可以拉。希望老兄帮忙啊。我的问题就是在那儿。得到最关键的提示，马上结帖

[SoHo_Andy]

实现方法：
1、创作flash动画。
1）启动flash，定义动画参数。
2）新建一个按钮符号，并把其拖到场景中。
3）在场景中右击按钮，在弹出菜单中选action，打开object actions对话框。
4）展开actions，双击FSCommand，在command和argnuments文本框中输入任意字符（有意义的字符，要记住，在VB中要引用，这里假设为browse，browse）。
5）保存并出版动画（假设出版的动画为flash1.swf），把它copy到VB应用的文件夹中。
2、启动VB。
1）新建窗口，添加控件：ShockWaveFlash 名字为SWF1。
2）在窗口中添加以下代码：
Private Sub Form_Load()
SWF1.Movie = App.Path & "\启动动画.swf"
SWF1.Play
bolUnload = False
End Sub

Private Sub SWF1_FSCommand(ByVal command As String, ByVal args As String)
Select Case command
Case "CLOSE"
unload me
from1.show
End Select
End Sub
3、保存，运行应用，OK！

找flash5装上花了我不少时间

[SoHo_Andy]

呵呵，修改一下

Private Sub SWF1_FSCommand(ByVal command As String, ByVal args As String)
Select Case command
Case "browse"
unload me
from1.show
End Select
End Sub

[paulone]

up

[aalei]

用 ShockwaveFlash 控件

你的问题很好解决

[SoHo_Andy]

必须完成两步工作
1、在flash 中编程，使用flash自带的教本语言，只需要简单编程即可，具体参考有关书籍
在flash中点击按钮时也有点击事件，在事件中发送字符，用于VB中接收
也可以在flash播放到某一帧时发送控制命令，通常是在启动动画播放时通过用户交互
选择性加载组件及界面

2、在VB中使用ShockWaveFlash 控件，用于播放flash文件和在它的方法中接收flash发送的
关键字符

简单示意代码
Private Sub Form_Load()
SWF1.Movie = App.Path & "\启动动画.swf"
SWF1.Play
bolUnload = False
End Sub

Private Sub SWF1_FSCommand(ByVal command As String, ByVal args As String)
Select Case command
Case "CLOSE"
unload me
from1.show
End Select
End Sub

[aalei]

不要那么烦，楼主的意思是只要进入下个窗体就可以了

我认为有2个FROM就可以了，FROM1用于方ShockwaveFlash控件，主要播放FLASH。再放一个COMMAND，用于关闭FROM1,显示FROM2。

[SoHo_Andy]

flash5。0之后的脚本语言得到加强，甚至可以开发出独立的用户交互系统
flash和VB结合，需要注意的是场景切换，界面风格的统一，不然就画虎不成反类犬了

[SoHo_Andy]

to 阿磊
楼主的这句话 “如何实现flash中的按钮与VB程序通讯的这一个功能”
你来理解就是简单的播放flash么

[aalei]

TO SoHo_Andy(冰）

我们软件的启动界面要嵌入一个flash动画，其中包含一些flash的活动按钮。
现在的目的是点活动按钮那么就进入下一个界面
现在的目的是点活动按钮那么就进入下一个界面
现在的目的是点活动按钮那么就进入下一个界面
现在的目的是点活动按钮那么就进入下一个界面
现在的目的是点活动按钮那么就进入下一个界面
现在的目的是点活动按钮那么就进入下一个界面

看清楚需求分析，我们把复杂的事做简单了，那是贡献。

[SoHo_Andy]

呵呵

[aalei]

大宝啊，天天见

[hepig2003]

阿磊同志有些曲解我的意思，我的意思是必须点击用Flash做成的按钮，而不是简单实现
Flash动画的播放。如何在flash中编写脚本程序？大家帮帮我

[online]

http://www.ourfly.com/download/downloadlist.aspx?type=VB
vb中如何调用flash

这个例子适合你

[SoHo_Andy]

整个开发的过程我说的已经够详细了
至于怎么编写flash的脚本程序就不是这里一句话说得清了
你发短信给我，私下我们交流一下吧

结贴喽