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