将 vb6 标准 exe 转换为 activex exe 的最佳实践是什么？

Question

我有一个遗留的大型 vb6 编辑器，其中包含大量第 3 方库和控件，最近需要将其设置为多线程，以便我可以独立于主编辑器窗体运行其他一些窗体。 基本上，除了通过单击主页上的按钮来运行其他表单之外，这些其他表单和主编辑器之间的通信量最少。

因此，通过大量谷歌搜索，我找到了一种方法，通过将当前应用程序设置为 activex exe 并添加一个设置为全局多用途的类来将当前应用程序转换为多线程应用程序以允许这种情况发生。 现在，在通过调试模式进行编辑和测试时，我发现当我退出时，有时会发生很多奇怪的崩溃。

'main.frm - button click call
'On the button click, create a new object
Set obj = CreateObject("MyApp.clsThread")
Call obj.NewThread

'clsThread
' Create a new form and load it to run on a new thread
Public Sub NewThread()
    Dim frm As Object
    Set frm = New frmDogbert
    Load frmDogbert
    frm.show
    Set frm = Nothing
End Sub

那么，当我这样做时，我绝对必须知道什么，即潜在的问题等？因为我担心该应用程序似乎变得更加不稳定。 或者有更好的方法来做到这一点吗？

更新：

我没有强行将我的应用程序破解为伪多线程应用程序，而是听取了这里好人的建议，并将组件重构为标准 exe，并将我的应用程序恢复为标准 exe 并通过 shell 调用它们。 效果很好:)

谢谢

Answer 1

Visual Basic 6 本身并不是多线程。 ActiveX EXE 和 ActiveX DLL 之间的多任务行为差异仅在从另一个 VB6 EXE 引用时才会显现出来。 从 ActiveX EXE 中定义的全局多用途类实例化的对象在其自己的上下文中运行。 从 ActiveX DLL 实例化的对象在调用 EXE 的上下文中运行。

现在，多线程可以侵入 VB6，但它非常敏感，并且有很多禁忌（例如，您不能使用 IDE 中的停止按钮来停止调试会话，否则程序将崩溃）。

ActiveX EXE 的优点在于生成一个单独但相关的实例，该实例可以单独运行而无需停止主程序。 根据您的简短描述，我想说您最好的办法是保持 EXE 不变，但将更多的表单/模块/类保存到单独的 EXE 中，并让原始 EXE 引用 ActiveX EXE。

请注意，您不必编译为 .EXE，您可以将扩展名更改为 .DLL，它仍然是一个 activeX EXE。 这样做是为了防止用户错误地自行运行 ActiveX EXE。

Answer 2

你能稍微澄清一下这个问题吗？ 我不明白为什么需要多线程？ 为什么不能只显示非模式表单，那么它们将同时可见并响应。 除非您在主窗体中始终运行一些后台处理，否则从您的问题来看这听起来不太可能，因为它会锁定主窗体以及其他窗体。

---

Melaos 说： 嗯，主编辑器 frm 是这里的主要内容，我需要允许用户运行附加表单来执行其他一些操作，例如将内容上传到我们的服务器并将视频文件转换为其他格式。 而这些形式使用shell来调用其他exe。 而且运行时间需要相当长的时间。

---

在这种情况下，我建议将其他形式制作成单独的 EXE，而不是使用多线程，因为这很困难。 您说从主窗体到子窗体几乎没有通信 - 它只是显示它们。 因此，您甚至不需要将子窗体制作为 ActiveX EXE。 只需将它们设为标准 EXE 并从主窗体中对它们进行脱壳即可。