ACCESS窗体的记录源无法用VB编程方式清除

望储公

设计视图中的ACCESS窗体属性：记录源  中有SQL语句
运行窗体时，如果该SQL语句或其数据有错误，则ACCESS提示相关信息
本人在VB编辑器的Form_Open()事件中，设：Me.RecordSource = ""
运行该窗体，仍然提示原来的信息，进入设计视图，原来的SQL语句仍然存在

已知，在设计视图中将其清除可以达到效果。但有时候程序出错时，也会令该属性存在SQL语句
请教，在不使用设计视图情况下，如何在窗体记录源(SQL语句)运行前，能够于VB编辑器中将其清除，令到完全由VB控制

望储公

请问在哪个事件中加入上述代码？

望储公

Form_Close、Form_Unload事件都进行了试验
在主窗体关闭时,也写入代码令子窗体的数据源为空
但都无效

望储公

例如：在窗体设计视图的数据源属性中写入：SELECT 部门.*, 部门.不存在字段 FROM 部门              '不存在字段  即错误SQL语句
保存。然后在VB编辑器中，无论如何处理，该属性中的SQL语句总是清除不了