Memasukan Flash pada VB

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.

Sebenarnya ada beberapa alternatif yaitu dengan memasukan komponen browser pada vb untuk memainkan animasi flash. Namun kita akan mencoba memasukan langsung komponent flash kedalam program vb kita. Langkah-langkahnya adalah



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

02Tambahkan 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

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

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


05 Selanjutnya tambahkan kode 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

06 Coba test program yang telah anda buat.

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

Free Template Blogger collection template Hot Deals SEO