我在程序中启动了一个IE浏览器，如果将它最大化啊

代码如下：
Dim ie As Object
ie = CreateObject("InternetExplorer.Application")       
With ie
            .Visible = True 
            .Navigate(strURL) 
            Do While .Busy
                Application.DoEvents()
            Loop

End With

我用的是VS2005，编程语言是VB，我启动一个IE浏览器，如果将它最大化啊 --------------------编程问答-------------------- shell 不行么 
另外vb6.0以上的版本都是vb.net。。。 --------------------编程问答-------------------- 哪位朋友帮帮忙啊 --------------------编程问答-------------------- 看代码不是.net的?
用SendMessage发最大化消息即可
    HWND = ie.HWND
    SendMessage HWND, WM_SYSCOMMAND, SC_MAXIMIZE, ByVal 0&
--------------------编程问答-------------------- .FullScreen(True) ? --------------------编程问答--------------------

引用 3 楼 asftrhgjhkjlkttttttt 的回复:

看代码不是.net的?
用SendMessage发最大化消息即可
  HWND = ie.HWND
  SendMessage HWND, WM_SYSCOMMAND, SC_MAXIMIZE, ByVal 0&

+1
不过前提需要使用FindWindow找到你打开的窗口的句柄（HWND） --------------------编程问答-------------------- 在VB6.0下，我这样试验是OK的：

Option Explicit



Private Sub Command1_Click()

    Shell "C:\Program Files\TheWorld 2.0\TheWorld.exe", vbMaximizedFocus

End Sub

--------------------编程问答-------------------- 楼上的方法是常用的。

补充：VB ,  基础类