vb.net中如何实现为webbrowser中网页内容的放大和缩小 5
展开全部
Private Sub ZOOMIE(v As Integer)
Dim webdoc As HTMLDocument
Set webdoc = WebBrowser1.Document
webdoc.parentWindow.execScript "document.body.style.zoom='" & v & "%'"
End Sub
Private Sub Command5_Click()
ZOOMIE 38
End Sub
控制V的大小就可以了,V=“38”
这种方法不能放大缩小 FLAS之类的钳入类文件大小
还有一种在IE8上可以实现平滑放缩的。。可惜我也在学习中
Dim webdoc As HTMLDocument
Set webdoc = WebBrowser1.Document
webdoc.parentWindow.execScript "document.body.style.zoom='" & v & "%'"
End Sub
Private Sub Command5_Click()
ZOOMIE 38
End Sub
控制V的大小就可以了,V=“38”
这种方法不能放大缩小 FLAS之类的钳入类文件大小
还有一种在IE8上可以实现平滑放缩的。。可惜我也在学习中
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询