Rumah Musafir Ilmu

Tutorial,Skripsi,Download Materi, dll

Visual Basic | Membuat Window Media Player dengan Visual Basic


Penjelasan nya agak simple jadi harap di maklumi.
1. Silahkan anda buka dulu Microsoft Visual Basic 6.0, setelah itu pada Tab Project –> Component Atau Shortcut CTRL + T
2. Cari Component “Windows Media Player” kemudian dicentang Lalu Ok.
3. Mari Masukkan Component – Component berikut ini pada Form Project : “Windows Media Player”, “Timer”, “DriveListBox”, “FileListbox” , “ListBox”, “DirListBox” ..
Coba perhatikan pada Komponen ListBox, Komponen ListBoxnya kita masukkan 2 buah List Box, tapi usahakan ListBox1 di Tindih sama ListBox2. Seperti yang terlihat pada gambar di bawah ini.


4. jika sudah kita akan mengisi Code di bawah ini :

Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
Private Sub File1_DblClick()
List1.AddItem Dir1.Path & “\” & File1.FileName
List2.AddItem File1.FileName
End Sub
Private Sub List2_DblClick()
List1.ListIndex = List2.ListIndex
WindowsMediaPlayer1.URL = List1.List(List1.ListIndex)
End Sub
Private Sub WindowsMediaPlayer1_EndOfStream(ByVal Result As Long)
List1.ListIndex = List1.ListIndex + 1
List2.ListIndex = List2.ListIndex + 1
WindowsMediaPlayer1.URL = List1.List(List1.ListIndex)
End Sub
Private Sub Timer1_Timer()
BackColor = RGB(Rnd() * 225, Rnd() * 225, Rnd() * 225)
End Sub

Seperti yg terlihat pada Gambar dibawah ini :


Jika Sudah selesai, cara memainkan sangat mudah :
1. pada DriveListBox cari dimana anda menyimpan lagu atau video tersebut.
2. pada DirListBox cari dimana Folder lagu atau Video anda.
3. Jika anda extensi .mp3 , .DAT , .flv, .dll Secara otomatis akan masuk ke FileListBox, Jika Sudah lakukan Doble Klik pada lagu atau video yang mau anda putar.
4. Secara otomatis akan masuk ke ListBox. Double Klik untuk Play. Nikmatilah
Kekurangannya pada aplikasi ini adalah lagu yang sudah berada pada ListBox tidak bisa next secara otomatis  harus melakukan Double Klik lagi pada lagu atau Videonya.

Silahkan Download Hasil yang telah dibuat oleh sumber artikel DOWNLOAD DISINI
Bagikan :
+
Previous
Next Post »
0 Komentar untuk "Visual Basic | Membuat Window Media Player dengan Visual Basic"

TINGGALKAN KOMENTAR DISINI

PROVIDER HOSTING

PROVIDER HOSTING
Penyedia Layanan Hosting, Domain, Reseller Hosting Professional
 
Support By Pringsewu Host
Back To Top