fshy　様

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Me.ClientSize = New System.Drawing.Size(400, 300)

        '▼前処理

        If InitializeGraphics() = False Then
            MsgBox("Direct3Dを初期化できませんでした。プロジェクトは終了します。", MsgBoxStyle.Critical)
        Else

上記の、InitializeGraphics()が.NET4.0に対応（？）していないようでエラーに成ったので、 対象のフレームワークを.NET Framework 3.0に変更して動作確認した所正常に動作しました。　尚、InitializeGraphics()が.NET4.0に対応（？）に付いてはこれから調べて見ます。

以上