红色区域是把图片变成黑白,其他代码全部正常,能出来网页,就是这个变成黑白不能执行
全部代码是:
Dim hdm As String
hdm = "<html> <style> .gray { -webkit-filter: grayscale(100%); -moz-filter: grayscale(100%); -ms-filter: grayscale(100%); -o-filter: grayscale(100%); filter: grayscale(100%); filter: gray; </style> <body> <h4><img src=""http://image.zhangxinxu.com/image/blog/201208/2012-08-19_155221.jpg"" class=""gray"" width=""40"" height=""40"" />春晓</h4> <p> 春眠不觉晓, 处处闻啼鸟. 夜来风雨声, 花落知多少. </p> <p>注意,浏览器忽略了源代码中的排版(省略了多余的空格和换行).</p> </body> </html>"
'赋值网页代码生成网页
Dim web = Forms("html").controls("webbrowser1").basecontrol
web.documentText =hdm