gpt4 book ai didi

ms-access - 如何使用 VBA 确定代码是否处于中断模式

转载 作者:行者123 更新时间:2023-12-05 00:27:28 25 4
gpt4 key购买 nike

为什么?

我什至关注 MyControl 如下

If IsNull(Me.MyControl.Value) Then

Me.MyControl.Value = "FREDDY"
SendKeys "{F2}"

End If

这很好用,并将光标放在文本 FREDDY 的末尾,以允许用户轻松地添加到文本中。

但是,如果我在 sendkeys 行上放置一个断点并“跳过”,则会在设计环境中打开对象资源管理器。 (即F2发给设计环境!)

我在其他地方的不同场景中遇到过这个问题。

如果处于 Debug模式,如何停止执行 sendkeys 行?

注意

screen.ActiveForm.Name

始终返回事件窗体的名称,即使代码窗口“具有焦点”也是如此。

非常感谢您的帮助。

最佳答案

在其中一个模块代码表的顶部声明一个公共(public) bool 值。

Public GLOBAL_RUNTIME_MODE as Boolean   'initialized as False
'optionally set it right here when you've stopped debugging.
'GLOBAL_RUNTIME_MODE = True

任何您想避免在调试 session 期间运行代码的地方,将全局 bool 值包装到代码行周围的条件语句中。

Me.MyControl.Value = "FREDDY"
If GLOBAL_RUNTIME_MODE Then
SendKeys "{F2}"
End If

在完成调试后,在一个地方更改公共(public)变量以影响所有条件。

GLOBAL_RUNTIME_MODE = True

关于ms-access - 如何使用 VBA 确定代码是否处于中断模式,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/33607903/

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com