IE9のアドレスバー非表示について

IE9のアドレスバーを非表示にしようと思い、次のようにvbsを作ったのですが、ie7などでは非表示になるのですが、IE9ではなりません。 どうすればよいのでしょうか？ test.vbs　－－－－－－－－－－－－－－－－－－－－ Option Explicit On Error Resume Next Dim objIEApp Set objIEApp = CreateObject("InternetExplorer.Application") With objIEApp .Navigate "http://xxx/xxx.html" .AddressBar = False .Visible = True End With