Membuat Media Player Sederhana Dengan Visual Basic 6.0

Media player. hmm sebenernya ini banyak banget contohnya.

Tapi ane mau share aja aplikasi yg udah ane buat. Semoga bermanfaat gan :D

1. Buka Visual Basic 6.0

2. Pilih Standard.exe

3. Sebelum melanjutkan membuat program Media player sederhana menggunakan visual basic, terlebih dahulu tambahkan komponen Media Player Control dan Common Dialog Control ke ToolBox Vb. 

Cara menambahkan Components baru ke Toolbox Visual Basic.

Caranya dengan Klik menu Project dan pilih components, atau dengan Mengklik kanan Toolbox dan pilih Components bisa juga dengan menekan tombol Ctrl + T dari Keyboard anda. Selanjutnya akan muncul jendela components dan beri centang pada Microsoft Common Dialog Control 6.0 dan Media Player Control. Klik Ok.

4.  Tambahkan Component tersebut, Media Player Control dan Common Dialog Control . Masing-masing Component satu buah dan atur sedemikian rupa atau kurang lebih tampak seperti gambar berikut ini.

5. Buat beberapa menu seperti Open dan Exit menggunakan Tools Menu Editor.

6. Pilih Menu File dan Pilih Open kemudian pilih Exit pada Form Project yang telah anda buat. Dan ketikan script visual basic berikut ini:

Private Sub exit_Click()

End

End Sub

Private Sub open_Click()

CommonDialog1.CancelError = True

CommonDialog1.Filter = _

    "Avi(.avi)|*.avi|All File (*.*)|*.*"

    CommonDialog1.FileName = "*.avi"

    CommonDialog1.DialogTitle = "Buka File"

    

    On Error GoTo ErrorHandler2

    CommonDialog1.ShowOpen

    On Error GoTo ErrorHandler1

    

    MediaPlayer1.openPlayer CommonDialog1.FileName

    

    Exit Sub

    

ErrorHandler1:

    MsgBox "Cannot play this file", vbExclamation

    

ErrorHandler2:   

End Sub

7. Jalankan Program Media Player Sederhana Buatan Anda. Buka sebuah file Video (Avi) dengan memilih 

File ->Open selanjutnya pilih film video yang ingin anda putar. Hasilnya kurang lebih sebagai berikut:

Tamat :D

Kalo agan agan butuh scriptnya tinggal download aja disini -> Download