首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

怎么让网页自动适应分辨率

2012-01-12 
如何让网页自动适应分辨率我做了一个exe文件嵌入网页,但在不同分辨率的环境下,网页就打开的不完整了,如下

如何让网页自动适应分辨率
我做了一个exe文件嵌入网页,但在不同分辨率的环境下,网页就打开的不完整了,如下图
http://b26.photo.store.qq.com/http_imgload.cgi?/rurl4_b=b6310bcdfb4a52fb636d12a3b2716c8dc7610b4a04aea78da94ee2e55bbbaea8bbcbcf4119b8194fbb140278e65ee709843f68659fc0112b354953ff352609a930c349b829f698eb9f4c47cb1d5fbdb5bf04e6de&a=27&b=26
还有请问我如何将网页固定,只能最大化


在线等!

[解决办法]
'首先添加引用Microsoft HTML object Library
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 Form_Load()
WebBrowser1.Navigate "www.baidu.com"
End Sub

Private Sub Command4_Click()
ZOOMIE 150
End Sub

热点排行