SWF Player dengan VB

Assalam'alaikum kawand-kawand semua kali nie aq ingin membahas tentang pembuatan swf player dengan visual basic nie...

oh y bagi yang udah tahu jangan banyak bcra y kalo perlu bagi ilmu aja sekalian...

nah pertama buka tu VB setelah itu baru kita desain formnya yang terdiri dari FileListBox, DirListBox dan DriveListBox dan juga yang paling penting itu komponen sockwafe flash...

untuk nambah komponen sockwafe flash lihat gambar berikut:

Klik Components...

selanjutnya akan muncul gambar dibawah ini kemudian carilah komponen yang bernama shockwafe flash terus centang dan klik ok.

nah kira-kira desainnya seperti ini lah

nah ini nih cekarang kita masuk di scriptnya, g banyak sih sebenarnya ni laangsung saja baca ndiri y???

hehehe

Private Sub Dir1_Change()

File1.Path = Dir1.Path

End Sub

Private Sub Drive1_Change()

Dir1.Path = Drive1.Drive

End Sub

Private Sub File1_Click()

ShockwaveFlash1.Movie = File1.Path & "\" & File1.FileName

End Sub

nah segini dulu ya

DOWNLOAD FILENYA DISINI