我已经搜索了几个小时,但没有正确的结果。我想要做的是在我的form1上创建一个最顶层的外部窗口。所以我的 form1 是最上面的,但是当通过 shellexecute 打开默认浏览器时,它应该保持在最上面,直到关闭。
我的代码是:
Dim r As Long
r = ShellExecute(0, "open", "http://www.google.com", 0, 0, 1)
当“google.com”打开时,默认浏览器应该保持在顶部,直到我前面提到的关闭。
有没有合适的解决方案?如果是这样,如果有人能告诉我该怎么做,我将不胜感激。