Sabtu, 02 Juni 2012

Cara Membuat MP3 player





Kali ini Saya akan menunjukan cara membuat MP3 player Kreasi sendiri!
Tool :
VB6 <<<< Full
VB6 <<<< Portable
langkah 1
Buka VB6 pilih>Standard.exe
buat form sesuka hati kamu 
2.Tambahkan komponen dengan cara tekan CTRL+T
centang "Microsoft Common Dialog Control 6.0" Dan "Microsoft Multimedia Control 6.0"






















3.Tambahkan label sebanyak 4 buah
Lalu berikan nama label tersebut , bukan di "name" tapi di "caption"
Label1 beri nama play
Label2 beri nama pause
Label3 beri nama stop
Label4 beri nama open file

4.Tambahkan MMcontrol dan Common Dialog ke form
MMcontrol1 beri nama mp3
Common Dialog berinama cd1
5.Isi kan code dibawah ini

_________________________________________________________________


'coding by Fuad Azmi
'http://kukar-xp.blogspot.com

Private Sub Form_Load()
mp3.Visible = False
End Sub

Private Sub Label1_Click()
mp3.Command = "Play"
End Sub

Private Sub Label2_Click()
If Label2.Caption = "Pause" Then
mp3.Command = "pause"
Label2.Caption = "Resume"
Else
mp3.Command = "pause"
Label2.Caption = "Pause"
End If
End Sub

Private Sub Label3_Click()
mp3.Command = "stop"
End Sub

Private Sub Label4_Click()
cd1.Filter = "Audio Files (*.mp3, *.wav) | *.mp3; *.wav"
cd1.ShowOpen
mp3.FileName = cd1.FileName
mp3.Command = "Open"
End Sub
 _________________________________________________________________












Build / Tekan F5


0 komentar:

Posting Komentar

Komentar nya Baek-baek aja ya!!! Jangan Omong kasar! ~_~