模块_函数_VBA_API

在access vba中,因为要对表中数据的操作,编写代码经常需要调用SQL语句。 我们通常不会在VBA代码中键入复杂的查询语句,而是在查询的设计视图中创建一个查询,将其切换到SQL视图,复制并粘贴到VBA中。 但是如果sql语句太长,我们...
本文介绍如何在VBA中递归列出文件,在列表框中显示文件路径和文件名 前面的我们讲过类似的实例《Access获取文件夹内的文件名及路径》,下面函数的功能更加完整 Public Function ListFiles(strPath As S...
在access数据库中,由于数据增加,数据库会膨胀,我们希望存档备份数据。 在不需要的旧数据情况下,例如数十万条记录,并且不断添加新记录。我们会把旧的不需要数据单独的保存在另外的数据库中。 执行过程包括以下步骤: 1. 开始一个事务。 ...
Access内置的DAvg()函数可以选择指定条件,获取表中字段的平均值 下面分享一个名为EAvg()函数,该函数是DAvg函数的扩展,可以从该字段中获取TOP(或百分比)的平均值。 甚至可以指定其他字段进行排序 Public Func...
access中,使用 DCount 函数可以统计特定记录集内的总数。但是DCount还有些不足: 1. 内置函数DCount()无法计算不同值的数量; 2. Access中的域聚合函数效率低下。 这里给出一个自定义的Ecount函数,它...
在access中,有几个D开头的域聚合函数。可以非常方便地获取数据。比如Dlookup,可以指定记录集内获取特定字段的值 但是Dlookup也有很多问题。 1. 只能返回找到的第一个匹配项。由于无法指定排序顺序,因此结果可能是不对的。 2....
11849   2019-09-30

access空值Null的常见错误

在access中,遇到Null时的常见问题: 1:条件为空 如果在查询的字段下输入条件,则它返回匹配的记录。如果记录中有Null值记录呢? 如在个人信息查询中, 输入“张三”可以筛选他的记录。 “张三” 输入Not "张三",可以筛选出不...
在应用程序中,如姓名,号码等为了避免错误,我们有时会限制文本框录入的内容的长度。 在非绑定的文本框中,我们可以通过掩码来限制,但是这种方法很多弊端,这里先不作讨论 这里介绍一下用vba代码如何限制录入的长度 如图,在窗体中添加一个“text...
在access数据绑定的窗体的中,由于窗体数据是直接绑定到记录源的,不需要通过按钮或者其他方式即可修改添加数据 这样非常容易意外操作数据,导致数据出错。 窗体的AllowEdits属性设置为FALSE可以防止这种情况出现,但是这样锁定会把所...
在应用程序中,如果默认日期与所需选择的日期相近。我们就可以让用户按“+”或者“-”来增加或者减少日期的录入。 这样就不需重新选择日期并输入新值。 如下面的代码,通过KeyPress事件获取键盘输入的KeyAscii值 Private Sub...
在应用程序中, 我们都需要筛选窗体或者子窗体上的数据。如下面的示例,筛选选中的值 《按选中的字段值筛选子窗体上的数据》 当然我们也可以反向选择,筛选非选中的值的数据。通过排除与上一个选定的字段数据匹配的来筛选窗体上的数据 如下图,选中子窗体...
在应用程序中,我们有时需要复制父子窗体选中的记录 比如复制订单记录。包括订单信息,订单明细信息,详细代码如下: Dim strSql As String 'SQL statement. Dim lngID As Long ...
在程序中,我们希望能按筛选的条件高亮突出显示搜索到的符合要求的内容。 先选择字段,再选择具体的内容。回车即可显示匹配的内容。  详细源代码: Private Const conMod = "Form_frmSea...
access中,一般利用子窗体筛选数据。我们可以通过重新设置数据源,或者查询等筛选记录。 可参考此示例《Access动态设置子窗体及筛选子窗体数据的技巧》 也可以通过RunCommand的acCmdFilterBySelection属性按...
在access窗体/报表的设计视图中,我们如果有绑定到窗体/报表的数据源,可以直接添加字段列表到窗体/报表中 可以在设计视图中,设计-添加现在字段 选择需要的字段添加到窗体/报表 也可以通过下面的代码显示/隐藏字段列表窗口 DoCm...
5/19