CARA MEMBUAT PEMUTAR MEDIA DI MICROSOFT VISUAL BASIC 6.0

Siang Gan, mengisi kekosongan waktu saya, Saya ingin berbagi Ilmu Tentang "Cara Membuat Pemuar Media di Microsoft Visual Basic 6.0".
Tanpa basa-basi langsung saja Agan praktekan dirumah masing-masing ya ! :)
1. Langkah yang pertama tentu kita buka aplikasi Microsft Visual Basic 6.0. Caranya Klik Start -> All Programs -> Microsoft Visual Basic 6.0.
2. Langkah kedua  pilih StandarEXE, seperti gambar di bawah ini :

3. Kita tambahkan Component pada Visual Basicnya dengan cara "CTRL+T", seperti gambar dibawah ini,tambahkan (Microsoft Common Dialog Control 6.0 dan Windows Media Player) :

4. Lalu Kita pilih Windows Media Player dan CommonDialog dan Drag ke lembar form , seperti gambar dibawah ini :

5. Lalu kita tambahkan CommandButton dan Label, seperti dibawah ini :
1. Label
Name = Label1
Caption = File Name
AutoSize = True
2. CommandButton
Name = Command1
Caption = Open File

 
6. Listing Kode nya Gan :

Private Sub Command1_Click()CommonDialog1.ShowOpen
WindowsMediaPlayer1.URL = CommonDialog1.FileName
Label1.Caption = CommonDialog1.FileTitle
End Sub






7. Coba jalankan programnya Gan, dengan cara klik F5 :), jalan gak ?