2

我有一个VB6程序，我可以从中打开一个外部exe文件。我使用Shell Execute看起来像这样的功能

Private Declare Function ShellExecute _
                          Lib "shell32.dll" Alias "ShellExecuteA" _
                              (ByVal hwnd As Long, ByVal lpOperation As String, _
                               ByVal lpFile As String, ByVal lpParameters As String, _
                               ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

和SetParent看起来像这样的功能

Private Declare Function SetParent _
                          Lib "user32" (ByVal hWndChild As Long, _
                                        ByVal hWndNewParent As Long) As Long

当我调用函数时，exe文件被打开并附加到表单，但我想保持文件以表单打开并作为独立文件单独打开。VB6SetParentexeVB6

这就是我打电话ShellExecute的方式SetParent

ShellExecute Me.fraImage.hwnd, vbNullString, FilePath, "", vbNullString, 1
SetParent BlackmagicHandle, Me.fraImage.hwnd

知道如何保持exe文件运行吗？

4

1 回答 1

0

如果您需要独立运行外部程序，您可以尝试使用 shell 代替 shellexecute。例如，在按钮的代码中单击 VB6 表单，该行：

shell "calc.exe"

启动在 VB 程序关闭时将保持打开状态的计算器。

于 2019-11-18T15:43:49.907 回答