Membuat media player dengan VISUAL BASIC

Hari ini Master Azure akan membagikan tutorial cara membuat Media player melalui Visual Basic meskipun banyak softwere pembuat salah satunya VB sendiri ikuti tutorial sederhana ini Yaaa........?

Langkah-langkah :

1. Instalasi program visual basic  

2. Lalu buka Start-Progam-Microsoft Visual Studio  6.0-Microsoft Visual Basic 6.0 

3. Akan ada Tampilan utama,
pilih standard EXE untuk memulai membuat aplikasi baru, dan klik open untuk memulainya4. Setelah pilih standart dan klik open,akan tampak tampilan form1 untuk memulai aplikasi

5. klik kanan pada toolbox pilih component

6. Pilih microsoft windows common dialog control 6.0
dan windows media player, lalu pilih apply dan ok

7. Buatlah Desain seperti ini dengan :

1 windows media player
1 common dialog
1 text box ( kosongkan )
dan 2 command button ( beri nama pilih dan keluar )

8. jika sudah klik 2x pada command pilih dan beri coddingan seperti ini
Private Sub Command1_Click()
CommonDialog1.ShowOpen
Text1 = CommonDialog1.FileName
WindowsMediaPlayer1.URL = Text1.Text
End Sub

9. dan klik 2 x pada command keluar dan beri coddingan seperti ini
Private Sub Command2_Click()
End
End Sub

10. untuk membuat menu bar di setiap aplikasi yang dibuat di vb6
- klik menu editor pada toolbar vb6 

- isi bagian nama &caption sesuai yang dinginkan (seperti: file/edit/about dll), kemudian ok

- untuk memasukan codingnya, klik 2x menubar yang telah kita bikin
11. lalu jalankan program dengan F5

12. dan pilih tombol klik untuk memasukkan lagu

13. lalu pilih open dan program akan running dan windows media player berhasil di jalankan

Aplikasi Multimedia dengan Visual Basic

Setelah membuat Windows Media Player, kita dapat menambahkan command-command lainnya, seperti menambahkan perintah add to playlist,list,image,dan lainnya.

Coding :

Private Sub addcmd_Click()

LstSumber.AddItem cmdlg.FileName

LstJudul.AddItem cmdlg.FileTitle

End Sub

Private Sub cmdDelete_Click()

On Error GoTo R

LstSumber.RemoveItem LstSumber.ListIndex

LstJudul.RemoveItem LstJudul.ListIndex

Exit Sub

R:  MsgBox "Choose First.", vbCritical, "Not Choose File."

End Sub

Private Sub CmdExit_Click()

End

End Sub

Private Sub cmdnext_Click()

LstSumber.ListIndex = LstSumber.ListIndex + 1

LstJudul.ListIndex = LstJudul.ListIndex + 1

wmp.URL = LstSumber.Text

Label1 = "Now Playing - " & LstJudul.Text

End Sub

Private Sub cmdopen_Click()

cmdlg.ShowOpen

If cmdlg.FileName = "" Then

' nothing happened

Else

wmp.URL = cmdlg.FileName

Label1 = "Now Playing - " & cmdlg.FileTitle

End If

End Sub

Private Sub cmdprev_Click()

LstSumber.ListIndex = LstSumber.ListIndex - 1

LstJudul.ListIndex = LstJudul.ListIndex - 1

wmp.URL = LstSumber.Text

Label1 = "Now Playing - " & LstJudul.Text

End Sub

Private Sub form_load()

Me.Width = 7020

mnAdd.Visible = False

Timer2.Enabled = False

Timer3.Enabled = False

End Sub

Private Sub Timer1_Timer()

Image4.Visible = False

Image2.Visible = True

Timer2.Enabled = True

Timer1.Enabled = False

End Sub

Private Sub Timer2_Timer()

Image2.Visible = False

Image3.Visible = True

Timer3.Enabled = True

Timer2.Enabled = False

End Sub

Private Sub Timer3_Timer()

Image3.Visible = False

Image4.Visible = True

Timer1.Enabled = True

Timer3.Enabled = False

End Sub

Private Sub LstJudul_Click()

LstSumber.ListIndex = LstJudul.ListIndex

End Sub

Private Sub LstJudul_DblClick()

wmp.URL = LstSumber.Text

Label1 = "Now Playing - " & LstJudul.Text

End Sub

Private Sub mnAdd_Click()

LstSumber.AddItem cmdlg.FileName

LstJudul.AddItem cmdlg.FileTitle

End Sub

Private Sub mnExit_Click()

End

End Sub

Private Sub mnOpen_Click()

cmdlg.ShowOpen

If cmdlg.FileName = "" Then

' nothing happened

Else

wmp.URL = cmdlg.FileName

Label1 = "Now Playing - " & cmdlg.FileTitle

End If

End Sub

Object	Property	Value
Listbox 1	Name	LstJudul
Command Button 1	Name	cmdprev
	Picture	D://Picture/icon_prev
Command Button 2	Name	cmdDelete
	Caption	Remove From Playlist
Command Button 3	Name	cmdnext
	Picture	D://Picture/icon_next
Command Button 4	Name	addcmd
	Caption	Add to Playlist
Command Button 5	Name	Cmdopen
	Caption	Open File
Command Button 6	Name	CmdExit
	Caption	Exit
Timer1	Interval	1:500
Timer2	Interval	1:500
Timer3	Interval	1:500
Image1	Picture	D://Picture/Layout
Image2	Picture	D://Picture/Multimedia
Image3	Picture	D://Picture/1KA03
Image4	Picture	D://Picture/Mantap

Semoga apa yang saya bagikan bermanfaat salam By Master Azure

NB: abang azure lagi ada urusan lain Jadi sekarang saya yang sementara mengelola Blog ini salam Kenal                 Master Azure  

Cara Mempercepat Koneksi Internet Modem Speedy 2x Lipat

Cara Mempercepat Koneksi Internet Modem Speedy - Internet adalah alat istimewa untuk kita menjelajahi dunia. Dengan akses internet kita dapat melihat, meneliti, mengambil  informasi apa saja yang ingin kita ketahui. Banyak sekali jasa untuk menyediakan akses internet ini seperti penjualan modem, pemasangan speedy, warnet  dan lain-lain. Namun, akses internet yang kita pakai tidak akan selalu cepat dan efisien, kadang kita akan mengalami kelemotan akses internet  yang tentunya akan membuat kita kesal dan tidak sabar jika harus menunggu lama.

Banyaknya pihak yang menyediakan jasa internet, namun kebanyakan orang lebih memilih menggunakan internet di rumahnya sendiri karena dinilai lebih mudah dan efisien, sebagai contohnya adalah Speedy. Produk ini dinilai dapat memuaskan pelanggannya karena akses internetnya yang stabil dan tidak gampang down, namun dinilai akses internetnya untuk paket yang sedang akan sedikit lambat. Untuk itu kali ini kami akan memberi solusi untuk Anda yang merasa akses internet dari modem Speedy kurang cepat, bisa menggunakan tips dari kami Cara Mempercepat Koneksi Internet Pada Modem Speedy berikut ini.

Cara Mempercepat Koneksi Internet Pada Modem Speedy

1. Gunakan tool keren yaitu NameBench

- Download NameBench disini , ekstrak, dan install
- Buka aplikasi , lalu ganti tulisan 250 di Number of Queries dengan angka 1, Lalu, untuk melihat DNS tercepat ganti Healt Check Peformance pilih Fast.
- Lalu, ganti browser yang dipakai. Jika sudak klik Start Bencmark.
- Sebelum memulai, matikan semua aktivitas yang menggunakan koneksi internet di PC atau laptop. Misalkan saja menutup peramban yang dibuka atau mengakhiri proses download yang sedang berjalan.
- Tunggu hingga proses analisa aplikasi NameBench selesai
- Jika proses selesai, NameBench akan tampilkan DNS tercepat yang bisa dipilih.

2. Langkah berikutnya, memasukkannya DNS tercepat tadi pada setting Local Area Connection di komputer atau laptop :

- Buka Control Panel lalu pilih Network and Internet
- Kemudian pilih Network and Internet Sharing Center
- Lalu pilih Change Adapter Settings
- Klik kanan pada Local Area Connection lalu klik Properties
- Scroll mouse ke bagian bawah dan pilih Internet Protocol Version 4 (TCP/IPv4)
- Lalu ganti Preferrend DNS dan Alternative DNS dengan DNS yang disarankan oleh tool NameBench tadi.

#. Dan sekarang lihatlah perbedaannya, pasti akan terasa cepatnya ^_^

Read too :
Cara Membuka Situs yang Diblokir dengan Mudah
Cara Mempercepat Download IDM
Cara Menjadikan HP Nokia sebagai Modem Komputer

Demikian artikel dari kami tentang Cara Mempercepat Koneksi Internet Modem Speedy, silahkan dicoba dan semoga bermanfaat

Pembayaran Pertama Dari Adf.ly

Pembayaran Pertama Dari Adf.ly -  Sudah lama sekali saya coba situs adf.ly, yaitu situs bisnis pemendek URL, dimana kita bisa mendapatkan earning apapbila link yang kita pendekan tadi ada yang klik dan mendapatkan kunjungan. Sobat blogger pasti sudah gak asing lagi kan dengan situs yang satu ini.

Tepatnya 1 agustus ini saya baru pertama kali mendapat bayaran dari Adf.ly. Memang dulu saya sempat frustasi dengan bisnis situs yang satu ini. Saya sempat tinggalkan karena earning nya gak naik-naik. Tapi saya gak nyangka ternyata ada satu blog gratisan saya yang menghasilkan lumayan earning dari sana. Ini hanya dari satu blog, bagaimana kalau saya memiliki banyak blog, wah hasilnya pasti lebih lumayan lagi.

Buat sobat yang mencoba bisnis pemendek URL ini, mungkin bisa mulai difokuskan lagi, karena ternyata situs ini benar-benar berbayar alias tidak scam.

Buat sobat yang ingin mendaftar disitus adf.ly bisa mencoba langsung daftar dengan klik link dibawah ini. Okey selamat mencoba sob.

[New] Download Aplikasi BBM Untuk OS Windows Phone

[New] Download BBM Untuk OS Windows Phone - BBM yaitu singkatan dari Black Berry Messenger adalah aplikasi chatting yang paling trend saat ini, setelah dibelinya produk BBM ini oleh pihak android gencarlah pemakaian OS android, yang didasari dengan harga yang relatif dan telah tersedia fasilitas untuk BBM. Namun teman akrabnya yaitu Windows, dengan banyaknya peminat produk ini mereka sadar akan banyaknya permintaan dari pengguna Windows Phone agar aplikasi BBM bisa dioperasikan pada sistem operasi besutan WIndows tersebut. Dan pada akhirnya pihak RIM memutuskan bahwa BBM akan dihadirkan pada smartphone WIndows atau Windows Phone. Menurut informasi dari blog resminya, pihak Blackberry akan siap menerima jutaan pengguna Windows Phone.

Dengan dirilisnya BBM for Windows Phone pertama ini, akan menyajikan suatu pengalaman yang belum dirasakan sebelumnya oleh pengguna Windows Phone yaitu melaui opsi privacy dan publik. Penggunanya akan dapat beraksi di chat BBM antara satu pengguna dengan pengguna BBM yang lain meskipun smartphonenya beda platform, dan tentunya sajian fasilitas berbagai gambar, catatan suara, status, kontak, dan juga lokasi.

Adapun pada BBM Groups anda dapat terhubung dan berbagi dengan lebih dari 50 kontak sekaligus. Sebagai tambahan untuk grup chat pribadi, BBM Groups menawarkan sebuah album foto dapat di sharing dimana semua anggota grup dapat mengomentarinya dan berbagi kalender dan konten lainnya.

Untuk pesan broadcast akan tersedia di rilis ini, menyediakan sebuah cara efisien untuk menjangkau kontak grup lebih banyak dan juga menciptakan sebuah feed dimana anda bisa mengecek berita dari semua kontak BBM anda.

Sampai saat ini pihak Blackberry sendiri tengah bekerja keras untuk menyediakan berbagai fitur terbaru untuk pengguna Windows Phone, seperti fitur tersebut ialah stickers, BBM Voice, BBM Chanels dan berbagi lokasi menggunakan Glumpse akan tersedia di beberapa bulan kedepan.

Tentunya semua pengguna smartphone saat ini menggemari aplikasi yang sederhana, keren, unik dan mudah digunakan dan tentunya didesain dengan apik.Dan di rilis-rilis berikutnya pihak BlackBerry berjanji akan fokus pada penyederhanaan antarmuka pengguna BBM untuk memudahkan sign-up, sign-in dan dalam penambahkan kontak BBM. Oleh karenanya pada area desain, pihak BlackBerry mengikuti keinginan pengguna yang berharap hadirnya desain familiar seperti yang mereka sudah terbiasa.


BBM telah di rilis untuk iOS dan Android pada Oktober tahun lalu dan menurut laporan BlackBerry aplikasi tersebut di download oleh lebih dari 10 juta pengguna hanya pada 24 jam pertama dan berhasil menempatkan diri sebagai aplikasi chat Android paling top.

Namun begitu, perusahaan Kanada itu tampaknya bertarung di pertandingan sulit mereka menangkan karena dinilai lambat mempublikasikan BBM keperangkat lain. Ketika Android dan iOS menjadi kekuatan dominan di perangkat mobile, pihak BlackBerry tidak bersegera menghadirkan BBM di kedua platform saingannya itu namun hanya diam menyaksikan bermunculannya lusinan aplikasi chat menyerbu pasar Android dan iOS.

Anda tertarik? Silahkan download BBM untuk Windows Phone (masih versi Beta) klik disini atau disini