Memutar Musik Mp3 di VB 6.0

Sore semua... Disini Putra akan menjelaskan bagaimana mendengar musik MP3 pada saat Form dijalankan. Caranya cukup sederhana buka VB 6.0. Kamu hanya harus menambah MMControl(Microsoft Multimedia Control 6.0) seperti gambar dibawah ini, dengan cara pada Menu bar kamu klik Project, klik Components.

Jika sudah di ceklist, akan tampil Komponen Baru seperti gambar arah panah dibawah ini :
Kamu klik komponen tersebut dan Klik tahan pada Form sesuaikan dengan ukuran yang kamu inginkan setelah itu dilepas. Sehingga akan tampil Gambar seperti dibawah ini pada Form kamu :

Jika sudah, kamu double klik form sehingga tampil Form Code. Sekarang kamu Copy=Paste Code dibawah ini :

Private Sub Form_Load()
PutraQincay.Notify = False
PutraQincay.Wait = True
PutraQincay.Shareable = False
PutraQincay.FileName = "D:\Musik\Putra\PutraQincay.mp3"
PutraQincay.Command = "Open"
End Sub

Kamu jalankan Form atau dengan cara menekan F5 pada keyboard. Kamu Klik Play pada MMControl dan........ Musik tidak akan diputar. Kenapa? "D:\Musik\Putra\PutraQincay.mp3" itu adalah Path alamat musik kamu. Jadi, kamu sesuaikan letak Local Disk, Folder dan Nama Mp3 kamu. Sekarang coba jalankan lagi. Musik akan diputar. Gampangkan?.... Tapi kurang bagus tampilannya. MMControlnya masih kelihatan dan Kita harus menekan Play terlebih dahulu agar musik bisa diputar. Gimana caranya biar waktu Form Load musik langsung diputar dan MMControl tidak tampil?...
Kamu cukup menambah code dibawah ini :

PutraQincay.Visible = False
PutraQincay.Command = "Play"

Kode lengkapnya akan seperti :

Private Sub Form_Load()
PutraQincay.Visible = False
PutraQincay.Notify = False
PutraQincay.Wait = True
PutraQincay.Shareable = False
PutraQincay.FileName = "D:\Musik\Putra\PutraQincay.mp3"
PutraQincay.Command = "Open"
PutraQincay.Command = "Play"
End Sub

Gimana?... Tidak sulitkan. Untuk selanjutnya silahkan dimodif sendiri. Yang perlu di ingat, kamu harus ganti PutraQincay dan sesuaikan dengan Name MMControl kamu. Name Standarnya MMControl1. Selamat Mencoba...