不明确的程序错误 MS Word 2010 VBA

Question

我在 Microsoft Word 2010 文档中有几个纯文本内容控件。 通过 VBA 代码，我使用 Document_ContentControlOnExit 事件在退出每个文本框内容控件时验证信息。 第一个文本内容控件的代码工作正常。 但是，当我使用相同的代码来验证其他文本内容控件（尽管替换了适当的函数参数）时，我收到了“检测到歧义名称”的 VBA 错误。 我的代码示例如下所示：

private sub Document_ContentControlOnExit(ByVal text1 as ContentControl, cancel as Boolean)
    if text1.ShowingPlaceholderText Then 'Field is empty
        msgBox "This field cannot be blank"
        cancel = True
    End if
End sub

text1 是第一个文本框内容控件的 tag 属性值。 我在这里做错了什么？ 我感谢您提供的任何帮助！

Answer 1

检测到歧义名称通常意味着有多个函数具有该名称。 搜索 Document_ContentControlOnExit 并删除不需要的重复项。

最好使用内容控件参数的默认名称（或仅使用“cc”）而不是“text1”，因为它是子中引用的当前控件。

这是您的代码工作的文件https://dl.dropboxusercontent.com/u/13440554/share/ContentControlOnExit.docm

希望这可以帮助