VB中如何使用WebBrowser显示网页中指定位置的图片?
比如我想WebBrowser控件中显示http://php.weather.sina.com.cn/search.php?city=武汉&dpc=1中关于武汉当天天气的图...
比如我想WebBrowser控件中显示http://php.weather.sina.com.cn/search.php?city=武汉&dpc=1中关于武汉当天天气的图片(仅显示那个图片) 。不知道在VB中这样可不可行,如果不能实现给个获取武汉当天天气预报的程序也行。
恳请各位大神帮忙! 展开
恳请各位大神帮忙! 展开
1个回答
展开全部
Private Sub Form_Load()
WebBrowser1.Navigate "http://php.weather.sina.com.cn/search.php?city=武汉&dpc=1"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Dim test As String
test = WebBrowser1.Document.body.innerhtml
test = Mid(test, InStr(test, "<!-- box begin-->"))
test = Mid(test, 1, InStr(test, "<!-- box end-->") + 14)
End Sub
test就是截取到的信息,你可以自行处理
WebBrowser1.Navigate "http://php.weather.sina.com.cn/search.php?city=武汉&dpc=1"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Dim test As String
test = WebBrowser1.Document.body.innerhtml
test = Mid(test, InStr(test, "<!-- box begin-->"))
test = Mid(test, 1, InStr(test, "<!-- box end-->") + 14)
End Sub
test就是截取到的信息,你可以自行处理
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询