Source Code untuk membuat Web Browser
Tinggalkan komentarNovember 9, 2010 oleh alverrocker
-Buka VBmu
-Tekan Ctrl+T
-Cari “Microsoft Internet Controls”dan Beri Cek,tekan OK
-Buat 4 command button untuk tombol back,forward,stop dan refresh.
-beri nama dan caption command button sesuai dengan yang kamu inginkan.
-Tambahkan 1 buah combobox untuk menulis address dan beri nama:cboURL
-tambahkan komponen web browser tadi(di toolbox gambarnya bumi)ke form dan buat segede-gedenya(form juga harus gede,kalo bisa fullscreen)dan beri nama: wWeb
-atur masing2 posisi komponen.saran:tombol dan combobox di atas,web browsernya hampir seluruh formnya saja.
Coding:
-Tombol Back : wWeb.GoBack
-Tombol Forward : wWeb.GoForward
-Tombol Stop : wWeb.Stop
-Tombol Refresh : wWeb.Refresh
tulislah Code diatas tapi dengan deklarasi codenya Click
-Klik 2x komponen web browser dan tulis kodenya
Private Sub wWeb_StatusTextChange(ByVal Text As String) cboURL.Text = (wWeb.LocationURL) Form1.Caption = (wWeb.LocationName) End Sub
Klik 2x Combobox tadi dan berikode ini Dengan deklarasi KeyDown
If KeyCode = vbKeyReturn Then
wWeb.Navigate cboURL.Text