代码如下:
Dim ie As Object
ie = CreateObject("InternetExplorer.Application")
With ie
.Visible = True
.Navigate(strURL)
Do While .Busy
Application.DoEvents()
LoopEnd With我用的是VS2005,编程语言是VB,我启动一个IE浏览器,如果将它最大化啊
Dim ie As Object
ie = CreateObject("InternetExplorer.Application")
With ie
.Visible = True
.Navigate(strURL)
Do While .Busy
Application.DoEvents()
LoopEnd With我用的是VS2005,编程语言是VB,我启动一个IE浏览器,如果将它最大化啊
解决方案 »
- 将某个窗体置于当前位置
- 关于fpSpread控件!!
- VB6界面组件
- 关于VB画图的问题
- 急:***.ocx版本可能已经过期。确认您使用的控件版本是同您的应用程序一起提供的。
- 如何实现像Windows中的拷贝进度的效果
- 怎么样在VB里面对一个数据库中的表排版,并打印???(在线等,高手快进)
- 程序强行终止用哪个方法???请帮助
- VB+SQL的CS结构程序在局域网中最多能带多少终端?
- 为什么vb连接数据库的时候我写的是“Dim rs As New adodb.Recordset”,总是提示用户定义类型未定义
- 如何点击button, 就如同点了DateTimePicker一样,让DateTimePicker呈现下拉状?
- 小弟刚接触vb,有道题求高手解释,小弟不尽
另外vb6.0以上的版本都是vb.net
用SendMessage发最大化消息即可
HWND = ie.HWND
SendMessage HWND, WM_SYSCOMMAND, SC_MAXIMIZE, ByVal 0&
不过前提需要使用FindWindow找到你打开的窗口的句柄(HWND)
Shell "C:\Program Files\TheWorld 2.0\TheWorld.exe", vbMaximizedFocus
End Sub