Hal yang Diperlukan:
Microsoft Visual Basic 6.0 [ download di SINI ]
Lanhkah - Langkah:
- Buka Visual Basic 6, buat project baru.
- Tambahkan Kontrol web browser(ketik ctrl+t, centang Microsoft Internet Controls, OK)
- Dobel klik Web Browser di Toolbox, beri nama WebBrowser1
- Tambahkan beberapa kontrol command button dan textbox. Properties nya sebagai berikut:
Kontrol: Nama: Caption: Text Box txtUrl (kosongkan) Command Button cmdGo GO! Command Button cmdBack Back Command Button cmdFoward Foward Command Button cmdRefresh Refresh Command Button cmdStop Stop - Masukkan coding berikut(klik kanan pada form, view code):
Private Sub cmdBack_Click()
'Untuk Kembali
WebBrowser1.GoBack
End Sub
Private Sub cmdFoward_Click()
'Untuk maju ke halaman yg telah di klik kembali
WebBrowser1.GoForward
End Sub
Private Sub cmdGo_Click()
'Untuk pergi ke sebuah situs web yang telah diketik di txtUrl tadi
WebBrowser1.Navigate (txtUrl.Text)
End Sub
Private Sub cmdRefresh_Click()
'Untuk merefres halaman
WebBrowser1.Refresh
End Sub
Private Sub cmdStop_Click()
'Untuk menyetop loading halaman
WebBrowser1.Stop
End Sub
Private Sub Form_Load()
'Untuk menetapkan sebuah situs web sebagai homepage
WebBrowser1.Navigate ("http://www.google.co.id/")
End Sub
Private Sub WebBrowser1_StatusTextChange(ByVal Text As String)
'Untuk merubah Caption Form1
Form1.Caption = WebBrowser1.LocationName + " - NAMA WEB BROWSERMU"
'Untuk merubah Text txtUrl menjadi url yg sedang kita tuju
txtUrl.Text = (WebBrowser1.LocationURL)
End Sub - Klik File > Make Project1.exe
Akhir kata, sekian da terimakasih.
Komentar
6 Komentar di artikel "Membuat Simple Web Browser menggunakan Microsoft Visual Basic 6"
Wah.. mantep nih.. programer :D hehe.. sekalian tak follow mas bro :D
2 Agustus 2011 pukul 03.04
siip, sudah saya followback..
7 Agustus 2011 pukul 07.33
ok sob
q coba dlu
3 Desember 2012 pukul 22.10
boleh juga nie di coba ,,, tapi,,,,
kalau buat loading barnya mana nie mas brow....????
23 Desember 2012 pukul 16.48
@wahono saputra : wah, blom tak temuin nih cara buat loadingnya.. Btw makasih dah mau comment..
2 Maret 2013 pukul 17.27
@jaringan wlan : siip deh..
2 Maret 2013 pukul 17.30
Posting Komentar
Blog ini blog DOFOLLOW, jadi dapatkan backlink gratis hanya dengan berkomentar.