====怎么获取WebBrowser打印预览窗口的句柄，我需要更改此预览窗口的大小====

Question

在Form上放置一个WebBrowser控件和一个Command按钮，如下操作private sub Command1_Click()
    WebBrowser1.navigate "http://www.126.com"
end subPrivate Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
   WebBrowser1.ExecWb OLECMDID_PRINTPREVIEW, OLECMDEXECOPT_DONTPROMPTUSER
End Sub单击Command1按钮之后，会弹出一个IE的打印预览窗口，而且这个窗口默认和Form一样大小，怎么样通过代码改变此窗口的大小和位置？