Cara Memainkan Animasi Flash di VB

Flash animasi yang berektensi .swf  yang biasa kita mainkan di flash player

disini kita juga bisa untuk coba untuk mainkan di Visual Basic dengan
menggunakan shockwaveflash Langkah langkahnya :

1. Buat project baru Visual Basic 6.0 pilih Standart Exe
2. Tambahkan komponen shockwaveflash di Menu Project pilih Componens
akan tampil seperti gambar

3. Buatlah form yg berisi, 1 buah shockwaveflash, 4 buah CommandButton
dan 1 Buah CommonDialog, seperti tampilan gambar

4. Masukkan Source code di bawah 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. Jalan kan Program yang sudah dibuat….
Open file (Cari file yang akan dimainkan) kemudian Play