VB6にてIE9のホームページを起動するには？

解決

こう 2011-04-26 19:20:06 No: 102874 IP: [192.*.*.*]

過去の回答を拝見させていただき、IE８までは無事にホームページを起動する事が出来ました。
ありがとうございます。

ですが、IE9を導入した結果、エラーを起こすようになりました。
知識が乏しく、原因が特定出来ません。

よろしければ、教えていただけると助かります。

以下、簡単（デモ）ですがソースになります。

Set WebBrowser = CreateObject("InternetExplorer.Application")
With WebBrowser
    .Visible = True '--可視化
    .Navigate2 ("http://www.google.co.jp/webhp?hl=ja&lr=lang_ja")

    '--画面の起動を待つ
    Do While .Busy Or .ReadyState <> 4
    Loop

End With

よろしくお願い致します。

編集削除

GOD 2011-04-27 13:19:31 No: 102875 IP: [192.*.*.*]

提示されてるサンプルを張り付けて実行してみましたが、普通に表示できましたよ。
試した環境はWIN7 32bit-SP1, IE9。

>IE9を導入した結果、エラーを起こすようになりました。
>
多分、私では回答できないだろうけどせめてどんなエラーが発生しているのか書かないと誰も回答できないよ。

編集削除

こう 2011-04-27 16:53:45 No: 102876 IP: [192.*.*.*]

GOD様、ご回答ありがとうございます。

申し訳ありません。
確かにおっしゃる通りです。

そこで、エラーを確認したのですが・・・
問題無く動作しましたorz

昨日は一行目の
Set WebBrowser = CreateObject("InternetExplorer.Application")
にて、エラーが起こっていたのですが、再現しません。
その際に、エラー文を控えておけば良かったのですが・・・

昨日のエラーは、他に要因があったのでしょうか。

お騒がせして申し訳ありませんでした。
現状問題は解決されました。
また何かありましたら、よろしくお願い致します。

編集削除