VBA实现接口的用户窗体cmdOK点击事件仅保留Me.Hide时生效问题

核心根因 #

该问题由VBA模态窗体的执行阻塞逻辑直接导致：

• VBA用户窗体默认以模态模式显示，你实现的IFName_Show方法调用的Me.Show没有传参数，符合默认模态行为：调用侧执行到frm.Show时代码会完全暂停，直到窗体被隐藏/卸载，才会继续向后执行后续的判断逻辑。
• 注释Me.Hide语句后，点击cmdOK按钮仅完成了me_DialogResult = vbOK的赋值操作，窗体仍然处于激活显示状态，调用侧frm.Show之后的If (frm.DialogResult = vbOK)判断逻辑永远不会被触发，因此看起来功能失效。
• 保留Me.Hide时，点击按钮后窗体会被隐藏，触发调用侧暂停的代码恢复执行，此时可以正常读取到已赋值的DialogResult属性，后续逻辑正常运行。

可选调整方案（非必须） #

如果你确实需要去掉Me.Hide语句，可以将窗体改为非模态显示，修改IFName_Show实现即可：

Private Sub IFName_Show()
    Me.Show vbModeless ' 非模态显示不会阻塞调用线程
End Sub

注意非模态模式下调用侧代码会立即向后执行，无法直接同步拿到用户操作结果，需要额外加事件监听或者轮询判断DialogResult，适配成本更高，当前使用Me.Hide的方案更适配你的现有代码逻辑。

内容的提问来源于stack exchange，提问作者Purclot