membuat MP3 player VB6

Tutorial membuat mp3 sederhana dengan menggunakan vb 6. tutorial ini sangatlah mudah bagi anda yang pemula. kita akan mencoba membuat aplikasi MP3 player sederhana dengan VB6:
contoh gambar pembuatan mp3 dengan VB6

Pertama-tama buka aplikasi VB6 kemudian klik standard EXE, setelah muncul sebuah form1 selanjutnya kita memasang beberapa komponen, yaitu
a) 1 buah picture box
b) 7 buah Image
c) 1 buah timer
d) 1 buah dirlistbox
e) 1 buah filelistbox
f) 1 slinder
g) 1 buah windows media player
h) 1 buah drivelistbox
untuk menampilkan sebuah slinder dan windows media player anda klik kanan pada toolbox kemudian klik components...
setelah itu muncul menu komponen kemudian pilih “microsoft windows common controls 6.0 (SP6)”
dan pilih juga “windows media player” kemudian klik Apply / OK. Seperti gambar di bawah ini:

kemudian atur semua komponen seperti di gambar MP3 player untuk memudahkan kalian ,
kemudian atur properti componen seperti di tabel ini:

setelah semuanya terpasang seperti yang kami contohkan kemudian masukan source code nya :

Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub

Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub

Private Sub File1_Click()
W1.URL = File1.Path & "\" & File1.FileName
Label1.Caption = W1.currentMedia.Name
frmMp3.Caption = W1.currentMedia.Name
End Sub

Private Sub Image1_Click(Index As Integer)
W1.Controls.Previous
End Sub

Private Sub Image2_Click(Index As Integer)
W1.Controls.pause
End Sub

Private Sub Image3_Click(Index As Integer)
W1.Controls.play
End Sub

Private Sub Image4_Click(Index As Integer)
W1.Controls.stop
End Sub

Private Sub Image5_Click(Index As Integer)
W1.Controls.Next
End Sub

Private Sub Timer1_Timer()
On Error Resume Next
W1.settings.volume = Slider1.Value
End Sub



Sekarang sudah jadi mp3 sederhana coba kalian jalankan....................
Selamat mencoba semoga bisa.

www.kebolimo.blogspot.com







<< PREV