Ms access MS Access Treeview加载ActiveX控件时出错

可能重复：

最近，我的访问表单中的Treeview元素出现了一个错误

作为事件属性设置输入的表达式Expand产生以下错误：在窗体或报表上加载ActiveX控件时出错

当我单击“确定”（仅opportunity）时，会出现下一个错误（Expand被MouseMove、MouseDown/Up、DblClick等替换），当我按键时，会出现KeyDown/Up/press消息等。 当我与TreeView交互时，“扩展”被替换为NodeClick或Collapse。 每个消息只出现一次，当我执行每个可能的事件时，没有消息弹出-但是树视图不工作，它不会打开任何表单（树视图用作菜单）

对我来说，神秘的事情是——上周那些Access数据库都工作得很好——我们为每个客户都有一个数据库（前端和数据一起），现在突然每个数据库都“崩溃”。我假设ActiveX Treeview控件是由Windows更新或类似操作更改的，但旧的WinXP笔记本电脑也会抛出相同的错误消息。 即使是一个已经有两周没有打开的数据库，而且当时肯定可以正常工作，现在也不起作用了。因此，从我的观点来看，代码中不可能有任何错误

尽管如此，我还是尝试在Form_Load事件中设置断点，但是在执行OnLoad的第一行之前，Expand错误已经弹出。 OnLoad事件是唯一指定的事件（GUI称为“事件过程”，仅其VBA代码），所有其他字段均为空（且未指定代码）。 我为例如MouseMove创建了一个空白VBA，但仍然出现错误

这个错误是什么？它来自哪里？希望有人能帮忙

问候,

马蒂亚斯

附言：

---

通过此链接，您可以在MS Access中找到treeview项目的文件（在第一个答案中提到）。当我下载这些文件时，同样的错误也会出现。。所以它肯定和activeX控件有关，对吗？是否有人在这些文件中工作，如果有，为什么？希望任何人都能帮上忙。

我也犯了同样的错误。我在以下链接中找到了解决方案：

我添加了下面列出的子项，并用我使用的键对其进行了调整，效果良好。 我希望这对你也有帮助。如果格式不好，很抱歉。我第一次发布任何东西

私有子xProductTreeview_Click（）

Dim nodSelected As mscomctlib.Node'是当前所选节点的变量

Set nodSelected = Me.xProductTreeview.SelectedItem ' get the currently selected node

If nodSelected.Key Like "Prod=*" Then ' are we on a product node
ElseIf nodSelected.Key Like "Cat=*" Then ' are we on a category node
Else ' somehow this is neither a category or product node
End If

---

End Sub

我也遇到了同样的问题-treeview上周工作，而不是2007年或2010年的今天访问多台电脑。问题是Windows update。（见链接）。我按照kb文章中的说明创建并运行了批处理文件，我的Treeview现在可以运行了。

请查看有关此主题的另一个问题：不幸的是，这没有帮助-我还认为代码不是问题，因为它在两周前工作，并且没有任何更改（代码中），它不再工作了。