利用flash.ocx的FSCommand事件,得到flash中传过来的命令,然后程序再做相应的处理。比如,你在flash中作了一个按钮,在它的action中写:
on (release) {
fscommand ("我的命令");
}
在vb中:
Private Sub ShockwaveFlash1_FSCommand(ByVal command As String, ByVal args As String)
    Select Case command
        Case "我的命令"
            '执行我的程序……
        case "其他"
            '……    
    End Select
End Sub