Tips n Trik – Memainkan Animasi Flash di VB

Tips n Trik – Memainkan Animasi Flash di VB

Animasi flash adalah gambar animasi bergerak berekstensi *.swf dan biasanya dijalankan dengan
menggunakan flash player. Animasi flash banyak digunakan untuk membuat banner pada website,
game dan bahkan banyak aplikasi yang dibuat dengan Flash. Selain itu kita juga bisa memainkan
animasi flash melalui Visual Basic yaitu dengan menggunakan komponen ShockwaveFlash
Langkah – langkah memainkan animasi flash di VB :
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






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

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





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
5. Jalankan program yang telah dibuat, klik tombol Open File kemudian cari file flash yang ingin
dimainkan, kemudian klik tombol Play.