Menampilkan Flash Player pada VB.NET (Pemrograman Visual Basic .NET)

Setelah berhasil membuat Flash Player dengan C#.NET kali ini penulis ingin mengajak untuk mencoba menjalankan Flash Player dengan bahasa pemrograman VB.NET, tentu saja caranya sama hanya bahasa pemrogramannya saja yang beda, yaitu menggunakan bahasa Visual Basic.

Pertama buat project di Visual Studio .NET, kemudian pada Toolbox, klik kanan Choose Item.

Setelah ditampilkan Jendela Choose Toolbox Items, pilih COM Components, kemudian cek pada komponen Shockwave Flash Object, OK.

Masukkan componen Shockwave Flash Object ke dalam Form1, kemudian tambahkan Button1, OpenFileDialog1 sehingga hasilnya Form1 tampak sebagai berikut :

Klik dua kali pada Button1, masukkan kode program berikut :


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If (OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK) Then
            AxShockwaveFlash1.Movie = OpenFileDialog1.FileName
            AxShockwaveFlash1.MovieData = OpenFileDialog1.FileName
            AxShockwaveFlash1.Play()
        End If
    End Sub


Setelah dijalankan hasilnya :

Ketika klik Open kemudian pilih file Flash *.swf maka file tersebut akan dimainkan.

Project selengkapnya dapat didownload disini. Setelah masuk Google Docs, kemudian klik File - Download.

Semoga berguna.