- 締切済み
VB6でWebBrowserへスタイルシートを渡す方法
VB6 XPHome SP2にて製作をしています。 変数にhtml用のデータを入れ、 WebBrowserにこちら(http://okwave.jp/qa1808887.html)を参考にデータを渡したのですが、 ヘッダーとして読み込ませた部分がすべて破棄されて<body>からになってしまいます。 WebBrowserへスタイルシートを渡すにはどのようにしたらいいのでしょうか？ また、 <style type="text/css"> span.nam{ font-size : 8pt;font-family : \"ＭＳ Ｐゴシック\"; font-weight: bold; } </style> のような感じのスタイルシートは渡す事ができるのでしょうか？ よろしくお願いいたします。
- mutuzi
- お礼率80% (34/42)
- Visual Basic
- 回答数1
- ありがとう数5
- みんなの回答 （1）
- 専門家の回答
みんなの回答
- redfox63
- ベストアンサー率71% (1325/1856)
回答No.1
『Microsoft HTML Object library』を参照設定します Dim doc as MSHTML.HTMLDocument Dim style as MSHTML.IHTMLStyle set doc = WebBrowser1.Document set style = doc.createStyleSheet("style.css") style.cssText = "span.nam { font-size: 8pt; " & _ "font-family : ""ＭＳ ゴシック"";" & _ "font-weight: bold" といった具合で設定出来ます
お礼
>set style = doc.createStyleSheet("style.css") この部分で型が違う等のエラーに悩まされましたが、MSHTML.IHTMLStyleというワードに関して調べ、多少修正することで解決することが出来ました。 大変参考になりました。ありがとうございました。