【发布时间】:2015-09-22 16:05:16
【问题描述】:
我是 VBA 菜鸟,但也许你可以帮忙:
我想刷新我的主表单“FinalForm”上的所有表单(子表单)和查询。但是,我使用 Access 作为 SQL Server 的前端。显然,通常的按钮(使用向导创建,如刷新、新记录等)将不起作用。
我通过关闭并重新打开表单创建了一个(愚蠢的)解决方法:
Private Sub Befehl71_Click()
DoCmd.Close acForm, "FinalForm"
DoCmd.OpenForm FormName:="FinalForm"
End Sub
这在 vba 编辑器中工作正常,但如果由按钮触发则失败(关于 ole 通信错误)。
我该如何解决这个问题?
【问题讨论】:
-
“关于 ole 通信错误的一些事情”——也许实际的错误消息可能会有所帮助。
-
我真的不知道为什么,但突然它起作用了:现在的代码是:Private Sub Befehl77_Click() DoCmd.Close acForm, "FinalForm" DoCmd.OpenForm FormName:="FinalForm" End Sub跨度>
-
也很抱歉这个可怕的毁容线程......