Membuat Pemutar Musik/Video di VB.NET

Membuat Pemutar Musik/Video di VB.NET

Program Media Player adalah sebuah pemrograman yang digunakan untuk memutar lagu dan video. Visual Basic adalah software yang digunakan untuk membuat suatu program melalui bahasa visual basic dan memungkinkan kita untuk mendesainnya juga.

Nahh, pada post kali ini saya akan membagikan tutorial tentang Bagaimana membuat sebuah Program Media Player dengan menggunakan Visual Basic Express 2010.

Program hasil dari tutorial ini cukup sederhana tapi sudah memiliki beberapa fitur yang lengkap, seperti : open, remove, clear all, playlist, sort ascending, sort descending, searching dan repeat (mengulang).

Langsung saja kita mulai tutorial dari step :

1. Buka Microsoft Visual Basic 2010 Express

2. Buat project baru pilih New Project

3. Pilih Windows form application, lalu klik OK

4. Muncul tampilan form visual basic

5. Tambahkan windows media player dengan cara Pilih menu toolbox – klik kanan All windows form – choose items...

6. Pada kotak dialog “choose toolbox item”, pilih tab COM components, beri tanda centang windows media player – OK

7. Otomatis windows media player akan ditambahkan di menu toolbox

8. Drag windows media player ke dalam form, atur sesuai gambar

9. Tambahkan 5 button dari toolbox, atur sesuai gambar

10. Tambahkan 2 openfiledialog dari menu toolbox

11. Tambahkan contextmenustrip dari menu toolbox

12. Double click contextmenustrip - Tambahkan teks sesuai gambar

13. Tambahkan 2 Groupbox dari menu toolbox, atur sesuai gambar

14. Tambahkan textbox dari toolbox, atur sesuai gambar

15. Tambahkan 2 listbox, atur sesuai gambar. Tempatkan terlebih dahulu listbox1 diatas groupbox2, lalu timpa/tindih dengan listbox2. Pada properties listbox2 pilih visible=False. Cara ini akan kita gunakan untuk membuat metode searching

16. Tambahkan 5 button dari toolbox, atur sesuai gambar

17. Tambahkan label dari toolbox, atur sesuai gambar. Pada properties pilih font, lalu atur sesuai gambar

18. Tambahkan menustrip dari toolbox

19. Klik menu strip, lalu masukkan teks sesuai gambar

20. Klik pada button5, lalu pada properties pilih text, ganti menjadi “Search”

21. Ulangi langkah 19 pada button4 =”Play”, button3=”Pause”, button2=”Stop”, button1=”Add”. Sehingga hasilnya seperti pada gambar

22. Pada button6 sampai button10 ganti text menjadi button6=”Add”, button7=”Remove”, button8=”Clear All”, button9=”Asc”, button10=”Desc”. Sehingga hasilnya seperti pada gambar

23.  Pada label ganti text menjadi nama media player, misalnya “RWPN”. Groupbox1=”Search Here”, Groupbox2=”Playlist”. Sehingga hasilnya seperti pada gambar

24. Ketikkan script berikut dengan cara double click object yang akan ditambahkan script

• Public Class form1

Dim w As IO.StreamWriterDim r As IO.StreamReader Dim openFile As ObjectDim CoName As String Private Sub ListBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBox1.DoubleClick
AxWindowsMediaPlayer1.URL = ListBox1.SelectedItemEnd Sub Private Sub ListBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListBox1.MouseDown
If e.Button = Windows.Forms.MouseButtons.Right ThenContextMenuStrip1.Show()End IfEnd Sub

•  OpenFileDialog1

OpenFileDialog1.FileOkFor Each track As String In OpenFileDialog1.FileNames
ListBox1.Items.Add(track)NextEnd Sub 

•  Pause

AxWindowsMediaPlayer1.Ctlcontrols.pause()

Bersambung...

Kurang lebih hasilnya seperti gambar berikut ini. Terlihat seperti tanpa perubahan sama sekali

1.       Tekan F5 untuk menjalankan program

Atau desain sendiri sesuai kreatifitas masing-masing :) Untuk file source code lengkapnya silahkan download link dibawah artikel...

Sekian tutorial membuat program media player dari saya. Semoga ilmu yang saya bagikan dapat bermanfaat bagi yang membutuhkan :)

Update >> Pengembangan Aplikasi Pemutar Musik / Video Dengan VB.Net