Code membuat Browser

Source Code untuk membuat Web Browser

Inilah Source code untuk membuat browser (ex:firefox,opera,dll)

Yak! tanpa basa-basi lagi Kita langsung ke Intinya!

-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

yak,dah jadi...!!!!

Silahkan kodenya dikembangkan sendiri.

Mudahan-mudahan Agan" Sekalian Bisa Paham..


Sumber : IH