模块_函数_VBA_API

有时候,我们需要往不同的表中动态添加数据。第一步就是先判断表中是否存在对应的字段。如果存在即添加,否则不添加。 如存在“职务”表,字段“职务” 判断表中是否存在该字段。参数stblname为表名,sfldName为字段名 Func...
183   2017-12-05

Access隐藏某个窗体

Access应用程序中,有时我们希望隐藏部分窗体或者报表等不让用户轻松查看 前面我们讨论过如何《Access彻底隐藏表显示表》 ,今天讲一下某个窗体的隐藏技巧 方法一: 在设计视图中,右键=》视图属性,弹出窗体属性对话框,“隐藏”选卡勾...
很多网友问到,如果通过选中表中的某个值,自动获取表中对应的值。 比如通过选择学生的学号,自动填写学生的姓名。 如这个示例,有如下一个表,表名表1,字段ID,类型。 通过选择id,自动获取类型 详细源码: Private ...
177   2017-11-27

Access判断文件是否存在

在Access中,如何判断文件是否存在呢?相信这个我们很多地方都能用。 比如获取文件名做相关的操作,如果获取不到再做其他的处理。 这里我们自定义了一个判读文件是否存在的函数 Public Function PathIsExist(sPa...
Null和Nothing在字面上都是空的意思。但是在Access中,两者是有很大区别的。 Nothing是设置对象为空 Null是设置值为空的区别 比如说:set rs=Nothing '设置记录集对象为空,释放内存 me.text1...
320   2017-11-15

Access vba动态创建查询

在Access中,我们一般都是通过菜单栏的创建=》查询=》查询设计来新建一个查询的。 但是有的时候。我们希望有VBA 动态创建一个查询,方便我们临时调用这个查询,比如导出这个新创建的查询的数据,然后删除之 详细函数: Public Su...
把一个长的字符串按固定的规则截取出多个子字符串。 如下面字符串"苹果;西瓜;香蕉;哈密瓜;菠萝;奇异果;樱桃",按“;”把逐个水果截取出来添加到表中。 详细函数: Public Sub subStringInsert() Dim...
223   2017-11-13

ACCESS读写注册表信息

在Access应用程序中,我们有时需要对注册表做一些更改以更好地展示Access的用户体验。 如何对注册表进行修改呢?这里列举3种方法。 方法一: 直接将要修改的键值保存为一个 *.reg 文件,用注册表编辑器导出某一键值就可以自动生成对应...
前面我们在《利用VBA Createobject函数创建的常用对象》一文中说过用CreateObject来创建对象。 也有介绍过如何在VBE窗口中直接引用对象。这个就是我们今天要说的前期引用和后期引用。这两者到底有什么区别呢? 首先说明...
在VBA中 Createobject函数可以创建并返回一个对ActiveX对象的引用 要创建 ActiveX 对象,只需将 CreateObject 返回的对象赋给一个变量: 代码就是创建一个 Microsoft Excel 电子数据表 ...
在Access中,我们会发现有些函数会在末尾出现一个美元符号“$”符号。如Left和Left$ ,可能很多人都认为这是两个不同的函数。 但是这是同一个函数,只是有两种版本,当在函数名称后面加上一个“$”时,函数会对于 Sting&...
在Access编写vba的过程中,代码窗口的最上方有时您会发现这么一句Option Explicit 的代码 Option Explicit的作用是强制显式声明变量,则必须使用 Dim、Private、Public、ReDim 或 St...
在Access中,Application.Echo  和Me.Painting = False方法都可以关闭屏幕重画,即禁止刷新 1、Echo 方法用于指定 Access 是否重画显示屏幕。 2、Painting 属性指定是否重画...
Screen.PreviousControl 属性     可以使用Screen对象有焦点时可返回到上次获得焦点的控件的引用。只读的。   Screen对象 一个表示屏幕对象的变量。 注解 焦点时包含...
在编写Access代码过程中,如果定义Dim db As Database。会提示:“编译错误:缺少用户定义类型,不是工程”如下图: 解决方法: 1、检查是否引用了DAO,确保DAO已经引用成功 2、用完整的写法,不要用省略写法,即Di...
2/9