多线程部件的调试限制(vba)

老伙计2008

VisualBasic开发环境只支持一个执行线程。为了调试部件的多线程行为，必须先编译部件，然后运行一个测试应用程序来测试该部件。

进程外部件
对进程外部件而言，这意味着既要编译该部件，还需要编译测试程序，然后运行测试程序的多个副本。（也可以通过多个开发环境的实例来运行多个测试程序副本，但这样将无法跟踪进入编译后的部件。）

进程内部件
为了测试使用单元模型的DLL的多线程行为，需要将测试程序分为两部分：一部分是标准的可执行程序，用于进行测试；另一部分为一个多线程的进程外部件。标准的可执行程序作为进程外部件的客户端，进程外部件又是DLL的测试客户端。

例如，多线程进程外部件可以提供一个TestMultiThreadDLL类。标准的可执行程序可以创建数目不等的TestMultiThreadDLL对象，然后给每个对象设置一份测试参数，然后调用其BeginTest方法。

如“创建ActiveXEXE部件”所述，BeginTest方法应打开一个纯代码的计时器，然后立刻返回，以避免阻碍单线程的标准EXE。TestMultiThreadDLL对象的计时器将控制进程内部件提供的对象的创建和测试。每个TestMultiThreadDLL对象将测试进程内部件内的一个线程（单元）。

注意要使用这种测试技巧，既要编译多线程的进程外部件，也要编译DLL。

使用本地代码调试器
如果要将部件编译为本地代码，并且拥有MicrosoftVisualC ，并且在编译部件时带有符号调试信息，那么就可以使用支持多线程调试的VisualStudio调试器进行调试。

调试消息
由于在开发环境中不能调试多线程行为，因此不能使用Debug.Print和Debug.Assert来显示调试消息字符串。

也不能使用消息框来显示调试消息。因为“无用户界面执行”选项将完全禁止用户交互。

发送调试消息的途径包括：创建一个单线程的ActiveXDLL（即未标记为无用户界面执行的DLL）。该DLL包含一个共有的、可创建的类，用来显示带列表框的无模式窗体。为这个类编写一个DebugMsg方法，该方法接收一个字符串参数并将其显示在列表框中的上部。多线程ActiveXEXE工程中的任何线程都可以调用这个单线程的DLL。这种调用将是很慢的，因为这属于跨线程调度（请参阅“设计线程安全的DLL”），不过在调试时这不算什么大问题。

提示在调试消息文字中请包括线程ID（ThreadID）。创建一个按照上述方式工作的单线程的进程外部件。

创建一个处理Windows消息的程序，使用AddressOf操作符得到一个VisualBasic窗体的子类。使用WindowsAPI创建并注册私有的消息，待调试的部件可以使用该消息发送调试字符串。
自己不懂，转此贴抛砖引玉。高手们讨论，我学习

lb_bn

VBa支持多线程吗？

老伙计2008

支持是肯定的，不能直接也能间接，微软没那么笨。关键是我们很笨