Internet Explorerを最大化で開くプログラム
2002/03/13

　このプログラムはInternet Explorerを最大化で開くプログラムです。

　動作環境：以下の環境で動作確認済みです
    Windows2000 Pro + Internet Explorer5.5 or 6.0

  開発環境：
　　Visual Basic 6.0

　1.新しいプロジェクトで「標準EXE」を選択します。

　2.Form1をダブルクリックしてコードを開きます。

　3.下記のコードを記述します。

Private Sub Form_Load()

    Dim lRet As Long
    Dim Obj_IEexe As Object

    ' InetExp Object の作成！
    Set Obj_IEexe = CreateObject("InternetExplorer.application")
    ' 最初に開く画面のＵＲＬ
    Obj_IEexe.Navigate "http://www.niji-net.com/index2.html"

    ' 属性設定
    Obj_IEexe.FullScreen = True
    Obj_IEexe.Visible = True
    'Obj_IEexe.Width = 1280
    'Obj_IEexe.Height = 600
    Obj_IEexe.MenuBar = False
    Obj_IEexe.StatusBar = False
    Obj_IEexe.ToolBar = False
    
    ' 画面を」開く
    Obj_IEexe.GoHome

    ' Form1を非表示にする
    Form1.Visible = False

End Sub

　※以下の場所は、プログラムを実行した際に開くＵＲＬの場所に変更します。

    Obj_IEexe.Navigate "http://www.niji-net.com/index2.html"
                       ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
  4.コンパイルし、実行