VB中怎样用webbrowser控件?

右击工具箱窗口--->部件--->选上Microsoft Internet Controls--->确定
基本操作：
goforward 前进
goback 后退
gohome 回主页
navigate 浏览
stop 停止
gosearch 搜索
属性：
LocationURL网页地址
LocationName网页标题
在新窗口打开链接:

Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
Dim NewForm As Form1
Set NewForm = New Form1
NewForm.WebBrowser1.RegisterAsBrowser = True '防止名称相同
Set ppDisp = NewForm.WebBrowser1.Object
NewForm.Visible = True
End Sub