Foxtable(狐表)用户栏目专家坐堂 → [求助]网页浏览器如何实现缩放效果


  共有2075人关注过本帖树形打印复制链接

主题:[求助]网页浏览器如何实现缩放效果

帅哥哟,离线,有人找我吗?
Hyphen
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/3/19 12:02:00 [显示全部帖子]

图片可以这样处理一下

Dim web  = e.Form.Controls("WebBrowser1").Baseontrol
Dim filepath = "C:\Users\c\Pictures\327e9189fa9130b3dd35f44b66ad6268.jpg"
Dim html As String
html = "<img border='0' src='" & filepath & "' width='100%' height='100%'>"
With web
    .Document.Write(html)
End With

word直接设置地址。默认是自动缩放的,PDF貌似不行

 回到顶部
帅哥哟,离线,有人找我吗?
Hyphen
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/3/19 15:05:00 [显示全部帖子]



 回到顶部
帅哥哟,离线,有人找我吗?
Hyphen
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/3/19 15:25:00 [显示全部帖子]

网页浏览器是没有事件的。

比如双击,实际上双击的是网页,事件由网页代码响应,而不是浏览器本身来响应

 回到顶部
帅哥哟,离线,有人找我吗?
Hyphen
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/3/19 15:52:00 [显示全部帖子]

下个版本会去掉

 回到顶部