Membuat Pemutar Video/Musik Dengan Visual Basic 6.0

Membuat Pemutar Video/Musik Dengan Visual Basic 6.0

Create: LEO | Sabtu, 02 Agustus 2014 | 23:25:10 WITA | dibaca: 35004


Salam Logika..!!

Assalamu alaikum wr wb.

 

  Kali ini saya akan berbagi pengetahuan buat teman2 yang ingin membuat sebuah alat pemutar video/Music sederhana dengan menggunakan Visual Basic 6.0. caranya gampang ikuti instruksi saya yah.. ok 

  

1. Buka Program Visual Basic 6.0

2. Buat Form Baru, kemudian arahkan kursor ke menu tools setelah itu klik kanan atau bisa dengan cara ctrl+t untuk membuka kotak dialog component. 

  

 

 

4. Ceklis pada Microsoft Common Dialog Control dan Windows Media Player kemudia Ok
 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 pada form juga seperti ini

  

 

 7. buatlah CommandButton dan gantilah Captionnya Menjadi "OpenFile" berikut ini

 

 

8. Klik2x Pada "OpenFile" Tersebut, masuk ke jendela Pengcodingan, ketikkan di bawah ini
   
    CommonDialog1.ShowOpen
    WindowsMediaPlayer1.URL = CommonDialog1.FileName 


begini saja pun sudah bisa di gunakan, tetapi agar lebih nyata lagi ikuti selanjutnya

9. Buatlah Label dan letakkan diatas Windows Media Player tsb.
     Ganti Captionnya Menjadi "FileName", dan AutoSize = True
     guna untuk mengetahui apa nama file yang sedang di mainkan

ketiklah coding berikut

  Label1.Caption = CommonDialog1.FileTitle
 
  code di letak di "OpenFile" atau dibawah code yang diatas tadi


10. Klik  Pada CommonDialong1 kemudian ihat propertienya 
     tuliskan pada Filter isikan seperti ini : MP3 (.Mp3)|*.Mp3|Wav (.Wav)|*.Wav|Mpg (.Mpg)|*.Mpg|Flv (.Flv)|*.Flv|3gp (.3gp)|*.3gp|AVI (.Avi)|*.Avi|Mp4 (.Mp4)|*.Mp4|All Files (*.*)|*.* 

  

 

 Agar pada saat kita membuka sebuah file dapat dikategorikan berdasarkan jenis file tersebut menjadi seperti ini jika di OpenFile

 

 Selesai deh programnya gampangkan!!

 terimakasih dan salam logika..!!



36 KOMENTAR

rental mobil di yogyakarta | 11 September 2014 || 02:19:42
" terima kasih infonya, sangat bermanfaat http://goo.gl/8XaXR0 "
jogja car rental | 11 September 2014 || 02:20:07
" terima kasih infonya, sangat bermanfaat http://goo.gl/8XaXR0 "
sewa mobil terbaik di jogja | 11 September 2014 || 02:20:28
" terima kasih infonya, sangat bermanfaat http://goo.gl/8XaXR0 "
rental mobil terbaik di jogja | 11 September 2014 || 02:20:48
" terima kasih infonya, sangat bermanfaat http://goo.gl/8XaXR0 "
sewa mobil di jogja | 11 September 2014 || 02:21:09
" terima kasih infonya, sangat bermanfaat http://goo.gl/8XaXR0 "
persewaan mobil yogyakarta | 11 September 2014 || 02:21:34
" terima kasih infonya, sangat bermanfaat http://goo.gl/8XaXR0 "
rental mobil jogjakarta | 11 September 2014 || 02:21:56
" terima kasih infonya, sangat bermanfaat http://goo.gl/8XaXR0 "
wisata di yogyakarta | 11 September 2014 || 02:22:48
" terima kasih infonya, sangat bermanfaat http://goo.gl/8XaXR0 "
| 20 September 2014 || 12:05:36
" "
boat for sale | 20 September 2014 || 12:08:03
" vsibio.com/baso-ikan-super-jasa-bahari.html "
boat for sale | 20 September 2014 || 12:09:44
" vsibio.com/baso-ikan-super-jasa-bahari.html "
boat sales | 20 September 2014 || 12:15:28
" vsibio.com/baso-ikan-super-jasa-bahari.html "
Boat Ship class | 20 September 2014 || 12:18:13
" vsibio.com/baso-ikan-super-jasa-bahari.html "
boat trader | 20 September 2014 || 12:20:42
" vsibio.com/baso-ikan-super-jasa-bahari.html "
boat trailer | 20 September 2014 || 12:25:09
" vsibio.com/baso-ikan-super-jasa-bahari.html "
boat trailer | 20 September 2014 || 12:29:05
" vsibio.com/baso-ikan-super-jasa-bahari.html "
boats | 20 September 2014 || 12:35:49
" vsibio.com/baso-ikan-super-jasa-bahari.html "
fishing boat | 20 September 2014 || 12:38:05
" vsibio.com/baso-ikan-super-jasa-bahari.html "
Wa Futures | 20 September 2014 || 12:41:12
" vsibio.com/baso-ikan-super-jasa-bahari.html "
bright futures | 20 September 2014 || 12:42:51
" vsibio.com/baso-ikan-super-jasa-bahari.html "
dow futures | 20 September 2014 || 12:44:42
" vsibio.com/baso-ikan-super-jasa-bahari.html "
futures trading | 20 September 2014 || 12:46:52
" vsibio.com/baso-ikan-super-jasa-bahari.html "
stock futures | 20 September 2014 || 12:49:07
" vsibio.com/baso-ikan-super-jasa-bahari.html "
Home Decorative Lighting | 20 September 2014 || 12:51:47
" vsibio.com/baso-ikan-super-jasa-bahari.html "
decorative lighting fixtures | 20 September 2014 || 13:08:07
" triims : vsibio.com/baso-ikan-super-jasa-bahari.html "
decorative lights | 20 September 2014 || 13:34:43
" triims : vsibio.com/baso-ikan-super-jasa-bahari.html "
decorative outdoor lighting | 20 September 2014 || 13:37:01
" triims : vsibio.com/baso-ikan-super-jasa-bahari.html "
outdoor lighting | 20 September 2014 || 13:44:17
" triims : vsibio.com/baso-ikan-super-jasa-bahari.html "
Baso Ikan Super | 20 September 2014 || 13:47:42
" triims : vsibio.com/baso-ikan-super-jasa-bahari.html "
FajarSR | 27 Januari 2015 || 19:47:26
" gan kalo pas waktu ceklis Microsoft Common Dialog Control muncul tulisan "object library not registerered" itu kenapa ya ? "
hendrik | 31 Januari 2015 || 15:52:59
" agar video nya bisa perulangan menurut listnya gimana caranya "
Indo188 | 24 Maret 2015 || 05:38:37
" Artikel yang sangat bermanfaat, terima kasih :)) http://goo.gl/Ie7IEb | http://goo.gl/eQV9d3 | http://bit.ly/1sUU8dl | http://pour.pw/957597 | http://goo.gl/CI4bLf | http://goo.gl/lNMX3D "
Google Apk Center By.DCC | 15 Desember 2015 || 12:45:50
" Mantab Salam Sukses mantab Ni Ane juga Dari DCC salam Kenal "
rere | 25 Oktober 2016 || 01:43:30
" mantap bos, ini saya dari DCC juga lulusan 2006 salam kenal ya buat anda semua, "
samsidi | 31 Agustus 2017 || 23:14:15
" kalo satu video sudah bisa kalo lebih dari dua bagaimana "
Obat Pembesar Vimax | 13 Januari 2018 || 06:52:37
" thanks ypu infona "



ISI KOMENTAR

NAMA

WEBSITE

KOMENTAR


Captcha Sepakbola
Apakah anda manusia?Lebih baik lagi kalau anda menyukai sepak bola
Sebutkan pemain sepak bola disamping:

Captcha Sepakbola by codingwear








  • $DCC = NEW XXI("Solidaritas","Loyalitas","Kualitas");
  • PELATIHAN KAMPUS
  • Pelatihan Komputer (DIGITAL SCHOOL)
  • Study Tour GoTv
  • IT FUN