Question

vb,webbrowser

用webbrowser打开网页，里面提取内容
比如：用WEBBROWSER打开http://www.ip138.com/ip2city.asp， 提取[ ]中间的内容，也就是ip地址，

Answer 1

WebBrowser1.Navigate "http://www.ip138.com/ip2city.asp"
Dim iIP As String
iIP = Mid(WebBrowser1.Document.body.innertext, InStr(1, WebBrowser1.Document.body.innertext, "[") + 1)
iIP = Left(iIP, Len(iIP) - 2)
MsgBox iIP
如果提示变量未设置就是你的webbrowser没有加载完，请自行添加等待加载的代码

Answer 2

WebBrowser1.Navigate "http://www.ip138.com/ip2city.asp"
Dim IP As String
aa=WebBrowser1.Document.body.innertext '得到网页源码
cc=InStr(1, aa, "[") + 1‘取置用instr查到“["这个位置然后从这个加1开始取

bb=InStr(1, aa, "]") + 1‘

IP = Mid(aa,cc,val(bb-cc))
MsgBox IP

Answer 3

这里有和你一样的问题，你参考一下吧。见参考资料