类调试中引发的错误就像在属性调用中引发的一样

Question

我（不幸的是）正在 Excel 2000 VBA 中开发一个应用程序。 我相信我已经发现，在自定义类属性、函数或子调试中引发的任何错误，就好像该错误是在调用该属性的 VBA 代码中引发的。 也就是说，VBE 调试器不会将我带到 Class 属性中发生错误的位置，而是将我带到首次输入该属性的位置（例如，从模块子或函数），这使得开发除最浅的 OO Excel 2000 VBA 代码，因为我必须逐行检查每个类方法以发现导致错误的指令。

我是否遗漏了某些内容，或者这是我必须在 Excel 2000 中处理的已知错误？ 这个问题在 2003 年或 2007 年已经解决了吗？

示例代码：

'''''''''''''''
'In Module1:

Public Sub TestSub1()
    Dim testClass As Class1
    Dim testVariant As Variant
    Set testClass = New Class1
    testVariant = testClass.Property1 'Debugger takes me here...
End Sub

''''''''''''''
' In Class1

Property Get Property1() As Variant
    Err.Raise 666, , "Excel 2000 VBA Sux!" 'But error is actually thrown here.
End Property

Answer 1

对于 Office 2003，当调试器配置为在未处理的错误时中断（默认配置）时，您将出现此行为。

如果您希望它在 Err.Raise 行上中断，则需要将其配置为在所有错误上中断（工具/选项/常规/错误捕获/在所有错误上中断）。

我相信 Office 2000 也是如此，但没有副本可供检查。

Answer 2

此页面是有关 VBA 错误处理的非常好的资源：

• 错误处理和调试提示和技术适用于 Microsoft Access、VBA 和 Visual Basic 6

Answer 3

这个“功能”在 Excel 2003 中是相同的，如果在 2007 中有所不同，我会感到惊讶。

Answer 4

在 Excel 2010 中同样如此 - 这就是我遇到这种行为的地方。

引用 Chip Pearson 的网站：

除了中断类模块之外，绝对没有理由使用错误捕获设置。

他对错误模式之间差异的描述：

当您测试和运行代码时，您可以使用三种错误捕获模式。 第一个是“出现所有错误时中断”。 如果发生任何错误，这将导致调试器打开，无论代码中可能有任何错误处理。 第二个选项是“未处理错误时中断”。 如果现有的 On Error 指令未处理错误，这将导致调试器打开。 这是最常用的选项，也是默认设置。 第三个选项“闯入课堂模块”是最重要且最少使用的。 这不是默认的错误捕获模式，因此您必须手动设置。

类模块中的中断是最重要的，因为它将导致调试器中断实际导致问题的对象模块中的代码行。 中断类模块设置位于“工具”菜单上的“选项”对话框中。 它位于“选项”对话框的“常规”选项卡上，如下所示。