Memainkan File MP3 Mengunakan Windows Media Player

Tips ini berguna mengunakan Microsof Windows Media Player dalam Aplikasi VB untuk memainkan file MP3.Untuk melakukan hal ini,maka pastikan window media player sudah terinstal di computer anda.

Persiapan:

1 buat 1 form

2 tambahkan window media player ke form dengan cara berikut ini :

• pilih dan klik menu project – components
• beri tanda √ pada kotak window media player
• klik ok
• drag control windows media player ke form

3 Jika Anda ingin Window Media Player menjadi invisible,maka atur property Visible ke false

4 Tambahkan 3 command button ke form anda dengan aturan berikut ini :

• command button pertama untuk play
• command button kedua untuk stop
• command button ketiga untuk pause/resume

ketikan coding berikut ini pada form :

private sub form_load()

command1.caption=”play”

command2.caption=”stop”

command3.caption=”pause/resume”

end sub

private sub command1_click()

‘ganti “D:\MP3\Myfile.MP3” berikut ini dengan file ‘MP3 yang ingin anda mainkan

Mediaplayer1.open ”D:\MP3\Myfle.mp3”

End sub

Private sub command2_click()

Mediaplayer1.stop

End sub

Private sub command3_click()

‘jika playstate adalah 2 : file sedang dimainkan.

‘jika playstate adalah 1 : file dalam keadaan pause

If mediaplayer1.playstate = 2 then

Mediaplayer1.pause

Else

Mediaplayer1.play

End if

End sub

Semoga Bermamfaat!!!

Sumber :Rahmat Putra