Memasukan Flash pada VB

Kali ini kita akan membahas bagaimana cara memasukan animasi flash kedalam Visual Basic. Animasi flash adalah gambar animasi bergerak yang mempunyai ekstensi *.swf dan biasanya dijalankan dengan menggunakan flash player. Banyak orang bingung, pada saat memasukan animasi flash ke dalam program vb.

Sebenarna ada beberapa alternatif yaitu dengan memasukan komponen browser pada vb untuk memaink animasi flash. Namun kita akan mencoba memasukan langsung komponent flash kedalam program vb kita. Langkah

1. Buat project baru pada Visual Basic 6.0 kemudian pilih Standard.exe

2. Tambahkan komponen ShockwaveFlash , pilih menu project -> components, maka akan muncul
kotak dialog sebagai berikut :

Beri centang pada komponen ShockwaveFlash kemudian klik tombol Apply kemudian OK.  Selain itu tambahkan juga CommonDialog dengan memberi tanda centang pada Microsoft Common Dialog Control 6.0

3. Jika Component tidak ada, anda dapat menginstal FalshPlayer terlebih dahulu dan mencari file Flash9b.ocx

4. Kemudian tambahkan ke Form, 1 buah object ShockwaveFlah, 4 buah CommandButton, dan 1 buah CommonDialog
sehingga tampilannya menjadi seperti ini :

5. Selanjutnya Copy Paste Source Code Berikut ini :

Private Sub Command1_Click()

Me.CommonDialog1.Filter = "Flash File (*.swf) | *.swf"

Me.CommonDialog1.ShowOpen

End Sub

Private Sub Command2_Click()

Me.ShockwaveFlash1.Movie = Me.CommonDialog1.FileName

Me.ShockwaveFlash1.Play

End Sub
Private Sub Command3_Click()

Me.ShockwaveFlash1.StopPlay

End Sub
Private Sub Command4_Click()

End

End Sub

6. Coba test program yang telah anda buat.

Sekian tutorial kali ini. Semoga bermanfaat bagi para pembaca, terimakasih.