同步VB6显然具有异步行为！崩溃

问题描述

我们有一个旧版VB6应用程序，该应用程序有时会挂起。我们认为这可能与转向Citrix有关，但现在可以在Win10的胖客户端上复制行为。我们认为以前在Windows早期版本中没有看到过此消息，但仍在检查日志以确认这一点。

当您进入一个文本框然后跳出时，我们会遇到这种情况。通过它时，我们正在做一个简单的ado调用，以查找/验证文本框中的某些数据。作为正确程序运行的一部分，我们正在记录

“Opening Dataset: SELECT ... FROM ... ”
“Opened Dataset”

在这两个日志语句之间是简单的ado数据检索代码，以前我们没有遇到任何问题。它在ActiveX dll中，并且正在同步运行。最重要的是，在这两个日志语句之间，没有DoEvents或api调用会产生控制权。据我们所知，它应该是纯同步操作。

当系统崩溃（偶尔发生）时，我们可以看到这两个日志语句之间还出现其他日志记录语句，它们可以是资源状态（例如，多少内存，gdi /用户对象-通常会因为计时器触发而找到）主要形式）或焦点类型事件（不是由计时器驱动的），至少在我们的代码库中如此。

“Opening Dataset: SELECT ... FROM ... ”
“Resource Status: ...”
“Opened Dataset”```

或

“Opening Dataset: SELECT ... FROM ... ”
“TextItem.OnLostFocus Item1 ...”
“TextItem.Validate ...”
“TextItem.OnGotFocus Item2 ...
“Opened Dataset”

所以我最初的问题是，在什么情况下，应该执行的同步操作应该被中断并表现为异步操作。

例如，我们没有这样做，我可以想象编写一些不安全的代码，从而通过使用多媒体计时器（在另一个线程上）并向一个模块的函数地址提供AddressOf参数，从而该计时器将启动我们的代码执行，并与正确的控制流分开。除此之外，我只是看不到如何以这种方式中断同步vb6代码。

如果有任何想法，建议或意见，我将不胜感激。如果太含糊，我非常抱歉。这也许反映出我正在努力解决这个问题。

解决方法

可以这么说，我们可以追溯到Windows 10以及我们正在使用的旧（不支持）套接字组件。看起来它是在“错误的时间”泵送消息队列，因此，我们看到UI事件出现在同步过程的中间。在较早的Windows版本中，我们没有看到这种现象。

我不知道Win10中可能发生了什么变化，这会导致这种情况，但是显然我们需要升级。