輕松實現(xiàn)Flash控制VB.NET程序
VB.NET經(jīng)過長時間的發(fā)展，很多用戶都很了解Flash控制VB.NET程序了，這里我發(fā)表一下個人理解，和大家討論討論。現(xiàn)在Flash動畫已經(jīng)能在VB.NET程序中播放了，那么怎么實現(xiàn)在Flash中控制VB的程序從而實現(xiàn)交互式的操作呢？本文的重點也在于此。
首先我們先來了解Flash控制VB程序的基本原理：在Flash的ActionScript里面有個叫做FSCommand（）的函數(shù)，它的主要功能就是發(fā)送FScommand命令，例如使動畫全屏播放，隱藏動畫菜單，更重要的就是可以與外部文件和程序進行通信。而在VB程序中，我們就是利用的 Shockwave flash控件的FSCommand（）過程來完成這一通信過程，實現(xiàn)信息發(fā)送的功能，并且根據(jù)發(fā)送出來的不同的命令及參數(shù)來實現(xiàn)對VB.NET程序的控制。
明白了吧？簡單的說，我們就是利用Flash中的FSCommand()函數(shù)向VB發(fā)送命令，利用Shockwave Flash控件來接受這個命令，從而達到Flash控制VB.NET程序的目的。
好了，現(xiàn)在知道了原理，我們就一步一步來實現(xiàn)吧！
1． 首先要打開Flash制作一個交互按鈕，并在按鈕上面加上如下代碼：
- on (release) {
- fscommand ("Send Action");
- //發(fā)送Send Action這個命令
- }
這個命令的作用是當按下按鈕后Flash向VB發(fā)送出名為”Send Action”的命令。當然，這個命令的名字在實際應(yīng)用中可以叫做其他的任何名字。
2． 將Flash導(dǎo)出成為swf文件，如文章第一部分所述插入到VB.NET中，下面就是VB.NET怎么接受這個命令的事情了；
3． 在窗體上雙擊Shockwave Flash控件，進入ShockwaveFlash1_FSCommand事件中，在此事件中加入：
- If e.command = "Send Action" Then
- MsgBox("Flash與VB.net成功結(jié)合了！", vbApplicationModal, "成功了！")
- '當接到Send Action命令的時候
- '這里加入你需要的程序
- End If
【編輯推薦】
