pb webbrowser控件用法

1、插入一个webbrowser控件命名
ole_webbrowser
2、写个打开网页的按钮
ole_webbrowser.object.navigate("www.baidu.cn")
3、插入一个listbox控件
4、写个获得链接的按钮
int i,count
string ls_link[]
count = ole_webBrowser.object.Document.getElementsByTagName("A").length
//messagebox('',string(i))
For i = 0 To count - 1
ls_link[i+1] = ole_webBrowser.object.Document.getElementsByTagName("A").item(i,1).getAttribute("HREF")
next
for i=1 to count
lb_1.additem(ls_link[i])
next

例 打开google搜索

//打开google

ole_webbrowser.object.navigate("www.google.com")

//输入搜索内容

ole_webBrowser.object.Document.GetElementsByName("q").item(0).SetAttribute("value", "xys_777")

//执行按钮

ole_webBrowser.object.Document.GetElementsByname("btnG").item(0).click