VB如何实现发出点击FLASH按钮的命令?

VB用了ShockwaveFlash控件，载入了一个联网查天气的Flash，就是这个FLASH： "http://flash.weather.com.cn/sk2/shikuang.swf?id=101050101"这个Flash有几个选项，有温度，湿度，气压，风向等，这些是可以用鼠标点击后查看的，但我想让VB自己实现点击这些选项的这个动作，就是想实现每隔5秒自动换一个天气项目，我之前用指定坐标模拟鼠标点击动作，但效果不理想，能不能用程序直接向ShockwaveFlash控件写某个指令来实现切换项目的动作？哪位高人可以帮助一下，万分感谢！

---

控件可以接收、发送flash命令的

flash发命令给vb:
在flash中，用fscommand(参数1，参数2);

vb的shockwaveflash控件接收,

vb传值给Flash。

me.shockwaveflash.setVal...什么的，忘记了，明天再给你段例子吧。

---

如期回帖

VB code:

Private Sub ShockwaveFlash1_FSCommand(ByVal command As String, ByVal args As String)
' 这里是用来接收Flash中发出的命令
' Flash的命令格式为 fscommand(command,args);
End Sub

' VB发送参数给Flash
Me.ShockwaveFlash1.SetVariable Flash中的元件名, 参数值
' 例如Flash中有个文本框元件,实例名为txt_Name，
Me.ShockwaveFlash1.SetVariable "_root.txt_Name.text", "显示我吧"

---

引用

如期回帖

VB codePrivateSub ShockwaveFlash1_FSCommand(ByVal commandAsString, ByVal argsAsString)' 这里是用来接收Flash中发出的命令
' Flash的命令格式为