Cara membuat Aplikasi Pemutar musik Dari Visual Basic 6.0

Beranda

...

Programmer Forum
Cara membuat Aplikasi Pemutar musik Dari Visual Basic 6.0

Taxi7

07-07-2012 18:13

Cara membuat Aplikasi Pemutar musik Dari Visual Basic 6.0

Semoga ngga emoticon-Repost

Agan agan sekalian bagi yang mau membuat aplikasi pemutar musiknya sendiri Silahkan mengikuti langkah langkah berikut

1.Buka program visual bassic agan.

2.Pilih-nya yang standart.exe

3.klik ctrl+T sampai muncul windows ini

Spoiler for Componen:

Cara membuat Aplikasi Pemutar musik Dari Visual Basic 6.0

Catatan

erhatikan ocx yang digunakan itu ocx-nya msdxm.ocx

4.drag komponen ke form

Spoiler for Gambar:

yang ada tulisan media player

5.Supaya tidak terlalu kelihatan windows media player buanget,...masukan componen picturebox ke dalam Form dan ataur posisinya (yang kereatip aja)

Spoiler for Gambar:

6.Tambahkan 1 buah commondialog dan 2 buah commandbutton dan letakkan seperti gambar

Spoiler for Gambar:

Catatan : Ubah Caption Command1 = Open File
Ubah Caption Command2 = About

7.Tambahkan 1 buah TextBox seperti di Gambar

Spoiler for Gambar :

8. masukan kode seperti di bawah ini

Spoiler for Code:

Private Sub Command1_Click()
On Error Resume Next
CommonDialog1.DialogTitle = "Open MP3 File"
CommonDialog1.Filter = "MP3 File (*.MP3)|*.mp3|WAV File (*.WAV)|*.wav|WMA File (*.WMA)|*.WMA)|MIDI File (*.MID,*.MIDI)|*.MID;*.MIDI|Video File(*.DAT,*.AVI,*.MPG,*.MPEG)|*.DAT;*.AVI;*.MPG;*.MPEG"
CommonDialog1.ShowOpen
If CommonDialog1.FileTitle <> "" Then
Text1.Text = CommonDialog1.FileName
MediaPlayer1.FileName = Text1.Text
MediaPlayer1.Play
End If
End Sub

Private Sub Command2_Click()
MsgBox "Media Player Sederhana" & vbCrLf & _
"Tulisan buat yang About" & vbCrLf & _
"Tulisan buat yang About", vbInformation, "About"
End Sub

9. tekan tombol F5 untuk mencoba hasilnya

10.

Spoiler for SUMBER:

http://rudymaturbongs.blogspot.com/2010/09/media-player-sederhana-dengan-vb6.html

Menerima

Spoiler for :