设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 2836|回复: 7
打印 上一主题 下一主题

[模块/函数] ACCESS窗体的记录源无法用VB编程方式清除

[复制链接]
跳转到指定楼层
1#
发表于 2017-2-15 19:02:27 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
设计视图中的ACCESS窗体属性:记录源  中有SQL语句
运行窗体时,如果该SQL语句或其数据有错误,则ACCESS提示相关信息
本人在VB编辑器的Form_Open()事件中,设:Me.RecordSource = ""
运行该窗体,仍然提示原来的信息,进入设计视图,原来的SQL语句仍然存在

已知,在设计视图中将其清除可以达到效果。但有时候程序出错时,也会令该属性存在SQL语句
请教,在不使用设计视图情况下,如何在窗体记录源(SQL语句)运行前,能够于VB编辑器中将其清除,令到完全由VB控制
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2017-2-16 11:21:09 | 只看该作者
用空查询 setect top 0 *---
3#
 楼主| 发表于 2017-2-21 20:02:47 | 只看该作者
请问在哪个事件中加入上述代码?
4#
发表于 2017-2-27 15:14:55 | 只看该作者
在窗体关闭时加上:
Me.RecordSource = ""

但最好先取消控件的数据源,这样可以尽量避免出错。
5#
 楼主| 发表于 2017-3-27 16:21:12 | 只看该作者
Form_Close、Form_Unload事件都进行了试验
在主窗体关闭时,也写入代码令子窗体的数据源为空
但都无效
6#
 楼主| 发表于 2017-3-27 16:23:53 | 只看该作者
例如:在窗体设计视图的数据源属性中写入:SELECT 部门.*, 部门.不存在字段 FROM 部门              '不存在字段  即错误SQL语句
保存。然后在VB编辑器中,无论如何处理,该属性中的SQL语句总是清除不了

点击这里给我发消息

7#
发表于 2017-3-28 10:37:38 | 只看该作者
手动把窗体数据源清空,然后把AllowDesignChanges 设置为FALSE,保存,再看看行不行
8#
发表于 2017-3-28 11:31:00 | 只看该作者
  1. SELECT 部门.* FROM 部门 WHERE 1<>1
复制代码
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-11-1 19:27 , Processed in 0.093474 second(s), 32 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表