Membuat Media Player dengan menggunakan Visual Basic

Tutorial kali ini adalah "membuat pemutar musik dengan visual basic 6".Mungkin beberapa artikel menggunakan komponen windows media player.Tapi saya rasa itu terlalu meniru.
jadi saya buat berbeda.Langsung ke TKP !

1.Sebelum masuk ke program kita harus menambahkan dahulu komponen multimedianya!
yaitu dengan cara.
klik "project" lalu pilih ":components" atau agar cepat bisa memakai Ctrl + T.Lalu cari dan ceklis "Microsoft multimedia control 6.0" dan "Microsoft common dialog control 6.0".
2.Masukan common dialog ke dalam form(tempatkan di pojok)

3.Masukan multimedia controlnya(tempatkan seperti gambar di atas)

4.klik multimedia control yang baru di tambahkan,lalu pada jendela propertis sesuaikan seperti berikut:
backvisible = false

ejectvisible = false

nextvisible = false

prevvisible = false

recordvisible = false

5.lalu tambahkan dua buah command button ke dalam form.dan ubah nama command button satu menjadi "Open" dan command button dua menjadi "keluar"

5.untuk hiasan masukan label dan ganti namanya sesuai keinginan

6.masukan textbox ke dalam form.

7.masukan script berikut dengan cara:
klik kanan pada daerah from(di dalam) lalu pilih "viewcode"

Private Sub Command1_Click()

On Error GoTo loncat

MMControl1.Command = "stop"

CommonDialog1.ShowOpen

MMControl1.FileName = CommonDialog1.FileName

MMControl1.Command = "open"

Label1.Caption = CommonDialog1.FileTitle

loncat:

Exit Sub

End Sub

Private Sub Form_Unload(Cancel As Integer)

MMControl1.Command = "stop"

End Sub

Private Sub Command2_Click()

End

End Sub

Lalu run project dengan F5

.::Keterangan::.
mungkin anda bertanya-tanya mengapa commondialog control tidak tampil pada saat di run.Itu karena sifatnya memang hanya pembuka file external seperti lagu,gambar,dsb