[VB.NET]在 Windows Forms 使用 Shockwave Flash Object 播放 Flash

  • 34937
  • 0
  • 2010-08-03

[VB.NET]在 Windows Forms 使用 Shockwave Flash Object 播放 Flash

 

一、問題描述

如何在 Windows Forms 表單上播放 Flash (swf) 檔,我們可以使用 Shockwave Flash Object  或 WebBrowser 控制項

假如使用 WebBrowser 控制項,步驟很簡單

1. 在表單中加入 WebBrowser 控制項

2. 撰寫程式碼


        Me.WebBrowser1.Navigate("D:\DEMO.swf")

 

本文重點將介紹使用 Shockwave Flash Object 播放 Flash

 

 

二、方法

1. 在 [工具箱],按滑鼠右鍵,選擇選單上的 [選擇項目]。

image

 

2. 出現 [選擇工具箱項目] 視窗,切換到 [COM元件] 頁籤,點選[瀏覽],切換到 C:\WINDOWS\system32\Macromed\Flash 下,

    點選最新的 OCX (如下圖為 Flash10e.ocx),按 [開啟]。

image

 

3. 確認 [Macromedia Flash Factory Object] 有勾選,按[確定],工具箱會多出兩個控制項。

image image

 

4. 將 Shockwave Flash Object 拖拉到表單

image

 

5. 在表單中加入一個 Button(Name: btnPlay),輸入以下程式碼撥放 Flash


Public Class Form1
    Private Sub btnPlay_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPlay.Click
        Me.AxShockwaveFlash1.Playing = True
        Me.AxShockwaveFlash1.LoadMovie(0, "D:\\DEMO.swf")
        Me.AxShockwaveFlash1.Play()
    End Sub
End Class

 

 

三、執行結果

image

範例下載 WinFormFlash.rar

 

四、相關連結

Embedding Flash in a Windows Forms .NET app

請問如何開啟swf檔!!