大问题,解决了给你100分
Public Function GoToWeb(WebAddress As String) As Long
On Error GoTo ErrDescription
Dim lRet As Long
lRet = ShellExecute(0&, vbNullString, WebAddress, vbNullString, vbNullString, vbNormalFocus)
GoToWeb = lRet
Exit Function
ErrDescription:
MsgBox Err.Description
End Function
我用上面的代码打开一个Web页面,那么如何获得刚才打开的IE窗口的句柄?
我想用Sendkeys 发送消息给刚才打开的IE窗体,进行一些操作,比如打印预览,那么Sendkeys 参数如何设置?