MEMBUAT
PROGRAM PEMUTAR MUSIK DENGAN VB 6.0 | APLIKASI MP3 PLAYER
Anda pasti hobi sekali bermain komputer
sambil mendengar musik atau apalagi online sambil mendengarkan musik itu sangat
mengasikkan, program yang anda buka pasti kalau bukan winamp, windows media
player, GOM player atau yang lainnya.
Tapi kali ini kita akan membuat sendiri aplikasi pemutar musik atau mp3 player tersebut dengan Visual basic, pasti anda menyangka sangat sulit untuk membuat aplikasi tersebut, jika prediksi saya itu benar berarti selama ini Anda salah besar karena dalam membuat program aplikasi mp3 player dengan program vb wah itu sangat mudah sekali, berikut tutorialnya :
Tapi kali ini kita akan membuat sendiri aplikasi pemutar musik atau mp3 player tersebut dengan Visual basic, pasti anda menyangka sangat sulit untuk membuat aplikasi tersebut, jika prediksi saya itu benar berarti selama ini Anda salah besar karena dalam membuat program aplikasi mp3 player dengan program vb wah itu sangat mudah sekali, berikut tutorialnya :
1. Jalankan program VB anda kemudian
buat new project dan tetap pilih standar.exe
2. Klik Menu Project >> Components (CTRL+T) kemudian pilih dan tandai Microsoft Common Dialog Control 6.0 dan Microsoft Multimedia Control 6.0 >> OK
3. Lalu tambahkan pada form proyek anda 2 buah label, 2 commandbutton, satu CommonDialog dan MMControl, desainlah seperti dibawah ini dan untuk picture background terserah anda
2. Klik Menu Project >> Components (CTRL+T) kemudian pilih dan tandai Microsoft Common Dialog Control 6.0 dan Microsoft Multimedia Control 6.0 >> OK
3. Lalu tambahkan pada form proyek anda 2 buah label, 2 commandbutton, satu CommonDialog dan MMControl, desainlah seperti dibawah ini dan untuk picture background terserah anda
Gambar program aplikasi mp3 player
dengan vb 6.0
4. Aturlah properties masing-masing kontrol seperti dibawah ini :
5. kemudian ketikkan kode/listing/script program dibawah ini :
Private Sub Command1_Click()
On Error GoTo loncat
MMControl1.Command = "stop"
CommonDialog1.ShowOpen
MMControl1.FileName = CommonDialog1.FileName
MMControl1.Command = "open"
Label1.Caption = CommonDialog1.FileTitle
loncat:
Exit Sub
End Sub
Private Sub Form_Unload(Cancel As Integer)
MMControl1.Command = "stop"
End Sub
Private Sub Command2_Click()
End
End Sub
6. Save hasil kerja anda dan kemudian silahkan run program anda dengan menekan F5, lalu klik open dan ambil lagu kesayangan anda lalu klik tanda play,,selamat mendengarkan
Gambar
Hasil program aplikasi mp3 player dengan vb 6.0
7. Mudahkan, Selamat Mencoba…!!!
Cara
Membuat Aplikasi Pemutar Video Dengan VB 6.0
Oke kali ini saya akan berbagi ilmu tentang visual basic 6.0,
sekarang saya memostingkan CARA MEMBUAT APLIKASI PEMUTAR VIDEO. Saya berbagi ini karena saya
sering mencoba membuat software sederhana akhirnya saya bisa membuat aplikasi
pemutar video sederhana, dan saya sudah mencobanya berkali kali hasilnya
berhasil dan aplikasinya lumayan bagus.
Oke tampa basa basi lagi kita menuju ke tutorial CARA MEMBUAT APLIKASI
PEMUTAR VIDEO :
Sebelumnya saya peringatkan BACA DENGAN TELITI !!!
1. Buka Program Visual Basic 6.0 (Pasti lah sobat ngerti cara membukanya)
2. Buat Form Baru
3.
klik Project lalu Pilih Components Atau pada keyboard CTRL +
4. Lalu beri tanda Ceklis (√) pada Microsoft Common Dialog Control dan Windows Media Player kemudian Ok atau Apply
Sekarang kita
akan membuat pemutar video/lagu menggunakan Componen WMV agar lebih gampang.
5. Aktifkan WindowsMediaPlayer kemudian buatkanlah pada Form
tersebut seperti ini
6. kemudian aktifkan juga CommonDialog dan letakkan di
sembarang tempat yang penting di dalam form
7. buatlah CommandButton dan gantilah Coptionnya Menjadi
"Open"
8. Klik2x Pada "Open" Tersebut,
masuk ke jendela Pengcodingan, ketikkan di bawah ini
CommonDialog1.ShowOpen
WindowsMediaPlayer1.URL = CommonDialog1.FileName
WindowsMediaPlayer1.URL = CommonDialog1.FileName
begini saja pun sudah bisa di gunakan, tetapi agar
lebih Profesional lagi ikuti selanjutnya
9. Buatlah Label dan letakkan diatas Windows
Media Player tersebut biar kelihatan lebih profesional. Ganti
Captionnya Menjadi "File Name", dan AutoSize = True
guna untuk mengetahui apa nama file yang sedang di mainkan
ketiklah coding berikut
Label1.Caption = CommonDialog1.FileTitle
code diatas di letak di "File Name" caranya klik 2X pada Label1
10. Sekarang klik Pada CommonDialong1
guna untuk mengetahui apa nama file yang sedang di mainkan
ketiklah coding berikut
Label1.Caption = CommonDialog1.FileTitle
code diatas di letak di "File Name" caranya klik 2X pada Label1
10. Sekarang klik Pada CommonDialong1
Filter : MP3 (.Mp3)|*.Mp3|Wav
(.Wav)|*.Wav|Mpg (.Mpg)|*.Mpg|Flv (.Flv)|*.Flv|3gp (.3gp)|*.3gp|AVI
(.Avi)|*.Avi|Mp4 (.Mp4)|*.Mp4|All Files (*.*)|*.*
Akhirnya selesai semoga sobat bias mengerti apa yang saya maksud diatas
gampangkan!!!
Buatlah aplikasi pemutar video sendiri sesuai kreasi dan Imajinasi
Sekian dari saya saya ucapkan. Trimakasih!!!
Jangan lupa LIKE dan Share Artikel ini!!