Masukan Komentar Anda Agar Blog menjadi Lebih Baik.....

Sabtu, 12 Januari 2013

Membuat pemutar film dengan visual basic 6.0


Kali ini saya akan share cara "Membuat pemutar film dengan visual basic 6.0".sebenarnya software ini di implementasi dari pemutar film yang ada di OS anda(windows media player,jadi untuk layar-nya kita tidak bisa edit.
namun untuk tombol,playlist dll kita bisa buat sedemikian rupa.Langsung saja !!!

1.Sebelum membuat projek kita harus menambahkan komponen "Windows Media Player dan Microsoft common dialog control 6.0" dengan cara
Project > Commponents atau bisa juga dengan Ctrl + T
(Lihat gambar di bawah)


2.Setelah itu kita masukan 1 windows media player,1 commondialog,3 command button.1 listbox ke form,dan desain seperti berikut :


3.Setelah semua selesai sa'at nya kita bekerja :
double klik pada tombol Open file,lalu masukan script ini ke dalamnya:

CommonDialog1.ShowOpen
If play = "" Then
player1.URL = CommonDialog1.FileName
play = CommonDialog1.FileName
List1.AddItem (CommonDialog1.FileName)
Else
List1.AddItem (CommonDialog1.FileName)
End If

4.Double klik pada tombol fullscreen lalu masukan ini :
player1.fullScreen = True

5.Double klik lagi pada tombol exit lalu masukan ini :

End

6.Saat nya untuk uji coba.caranya pada saat Run.klik tombol "open file" > pilih film yang sekiranya bisa di putar oleh windows media player > putar



*Catatan

1.Jika anda ingin membuat tombol reset agar daftar di list box bersih kembali anda tinggal membuat tombol "Reset" lalu masukan ini ke dalamnya
List1.List = ""
player1.URL = Nothing

2.Pada saat proses Run,commondialog control tidak akan tampil karena sifatnya yang hanya untuk membuat file External !!!

5 komentar:

  1. Komentar ini telah dihapus oleh pengarang.

    BalasHapus
  2. kalau itu video di simpan bagaimana caranya?
    terima kasih

    BalasHapus
  3. Bagus seh untuk pemula....
    Sayangnya source ini tidak menampilkan playlistnya !
    jadi mutarnya cuma satu satu

    BalasHapus
  4. mas tau ga gimana caranya pas form dibuka video nya play sendiri?
    terima kasih,mohon bantuannya

    BalasHapus

 

Copyright © newbie pc Design by Free CSS Templates | Blogger Theme by BTDesigner | Powered by Blogger