VB2008で.swfの再生方法を教えて下さい。

VB2008で.swfの再生方法を教えて下さい。
検索したのですが、見つけられませんでした＞＜；

出来れば、簡単なコードで説明して頂けると助かります。

宜しくお願い致します。

①ツールボックス上で右クリック
②「アイテムの選択」を選択
③「COMコンポーネント」を選択
④Shockwave Flash Objectを選択
⑤ツールボックスにShockwave Flash Objectが追加される。
⑥Shockwave Flash ObjectをFormにDrag&Drop
⑦名前を「AxShockwaveFlash1」に設定
⑧以下のコードを任意の場所に書く
　AxShockwaveFlash1..LoadMovie(0, "swfファイルのパス")

こんな感じで。

ん、ちょっとミス
× AxShockwaveFlash1..LoadMovie(0, "swfファイルのパス")
○ AxShockwaveFlash1.LoadMovie(0, "swfファイルのパス")

ありがとうございます。
無事解決できました。

ご返答、有難うございました。
当初予定していた事は出来るようになりました。
それは、ネット上からの外部リンクでswfを再生したいと思っておりました。
しかし、セキュリティーソフトで遮断される為、
思うようには出来ませんでした....。

swfを埋め込む方法はありますでしょうか？
方法がありましたら宜しくお願い致します。

こんにちは。
ちょっと気になったのですが、

>swfを埋め込む方法はありますでしょうか？
>方法がありましたら宜しくお願い致します。 

ご自身の制作された、もしくは配布許可を得たフラッシュですよね？

そうでないとすれば、
セキュリティが許しても法が許さないし、
下手すればファイル埋め込みの方法を教えた人も
幇助の罪に問われかねないと思いますが。

swfのデータは私が作ったものですので大丈夫です＾＾