cara membuat aplikasi pemutar musik pakai visual basic 6.0

Assalamualaikum wr.wb

Kali iniu saya akan membahas mengenai cara membuat aplikasi pemutar musik .exe yang langsung saja :

Bahan yang anda perlukan adalah :

-         Komputer

-         Aplikasi visual basic 6.0 kalau beli di gramedia harga kira-kira sekitar 20.000,-

-         Aplikasi winamp

-         Dan sedikit pemahaman seputar visual basic

Nah ,duduk yang santai minum kopi dan dengarin musik kalau bisa ya agar anda tidak jenuh saat membuat aplikasi ini menggunakan visual basic (atau yang biasanya disingkat VB) nah buka program visual basicnya (VB) setelah terbuka muncul jendela kayak gini 

Sudah?,ditanyak kok diam aja nah kalau sudah muncul jendela kayak gini pilih standard exe dan setelah itu tekan open ,jika sudah langkah selanjutnya adalah menambahkan komponen klik project menu di paling atas disebelah view,sama format ,lalu klik components atau tekan ctrl+t setelah itu muncul jendela menu kayak gini

Nah sekarang tandai componen berikut di jendela tersebut antara lain :

-         Microsoft common dialog 6.0 (SP3)

-         Microsoft multimedia control 6.0

Dan jika sudah menandai klik ok (perhatian jika tidak bisa ulangi terus sampai ada yang muncul di kiri componennya)

Nah sekarang tambahkan componen berkut ke dalam from

Nama componen	banyaknya
mmcontrol	1
Command button	2
Label	2
Common dialog	1

Perhatian :jika anda mau menambahkan aksesoris lain silahkan saja

Lalu ubah componen berikut ini yang sesuai dengan yang diperintahkan

Nama componen yang diganti	Kategori componen yang diganti	Isi dengan yang ini
Command1	caption	Open/buka
Command2	caption	Exit/keluar
Label1	caption	Aplikasi pemutar musik atau (nama aplikasi pemutar musik yang anda buat)
Label2	Caption borderstyle	(kosongkan) 1-fixedsingle
Commondialog	Cancelerror filter	TRUE *MP3
MMcontrol	Eject enable Eject visible Pause enable Pause visible Play enable Play visible Stop enable Stop visible	Semuanya kasih TRUE

Jika sudah sekarang tinggal kasih code-codenya klik kanan pada suatu komponen yang anda buat lalu klik view code

Nah tanpa otak otik(maksudnya jangan diotak-atik)co-pas aja code di bawah ini

Private Sub Command1_Click()

On Error GoTo loncat

MMControl1.Command = "stop"

CommonDialog1.ShowOpen

MMControl1.FileName = CommonDialog1.FileName

MMControl1.Command = "open"

Label2.Caption = CommonDialog1.FileTitle

loncat:

Exit Sub

End Sub

Private Sub Form_Resize()

On Error Resume Next

Form.Width = Me.ScaleWidth

Form.Height = Me.ScaleHeight - 1680

End Sub

Private Sub Form_Unload(Cancel As Integer)

MMControl1.Command = "stop"

End Sub

Private Sub Command2_Click()

End

End Sub

Nah setelah itu kita kembali ke form1 sekarang kita atur baik-baik ya componenya agar indah dipandang mata kalau saya sarankan seperti saya ini :

  nah kalau gitu sekarang kita coba dengan cara klik start/ klik f5 

(Sudah dalam keadaan mulai )

nah nikmati deh nilai guna aplikasi pemutar music buatan anda sendiri

Perhatian : jika ada yang error coba periksa nama (komponen)  / adakah tulisan yang berwarna merah di jendela view code ?jika ada kekeliruan tanyakan saja dengan cara berkomentar di bawah ini