模块_函数_VBA_API

很多时候,我们都需要获取文件夹下的所有文件进行处理。 前面我们分享个一个示例《Access获取文件夹内的文件名及路径》,可以获取文件夹的文件名及路径。 但是如果文件夹下还有文件夹,子文件夹等,即获取不到更下层的文件了。 如下图所示,获取...
一般情况下,我们习惯说年龄都要虚岁为主。不满周岁会直接算成周岁。这个计算很简单,直接用当前年份-出生年份(year(Data())-year(出生))即可。 但是小孩子变化很快,每半周岁情况就会有大不同,所以需要以半周岁为一个单位。 如出生...
论坛有老用户提问到关于显示点击的控件问题,即窗体中有若干标签(label),如何能知道当前被点击的是哪个? 如下图所示,当点击标签时,显示点击到标签标题 版主roych在一番斥责后,给出了答案,用onclick对象返回“属性”窗口中“...
Access数据库文件可以包括前台界面和后台数据库 Access设计应用程序虽然简单易用,开发速度快。但是也极容易由于操作不当导致数据库损坏。 所以数据库要经常备份,防止数据库损坏导致数据丢失。 如何让Access程序每次打开都自动备份呢?...
用access获取系统文件夹中的文件名,可以对文件进行操作处理 如何获取文件夹内所有文件的文件名及其路径呢? 下列代码获取上图文件夹中所有文件名及其路径。 Set fso = CreateObject("Scripting...
9603   2018-09-18

Access数据加载到列表框

在Access中,可以用文本框,标签等显示一条数据。如果是数据集一般是用子窗体或者列表框。 那么如何把数据加载到列表框上显式呢? 列表框在属性里,通过行来源属性可以快速绑定数据源。从而展示数据。 设置行来源类型 属性,可以选择:“表/查...
在论坛中,我们可以轻松搜索到自定义的自动编号函数。可以直接调用使用,如下: access创建自定义递增自动编号(不固定位数)  一个用于自定义自动编号的通用函数(支持数字型、文本型编号,支持断号重续) 高效的年月日的自动编号函...
6014   2018-09-01

Access vba变量的写法

在利用Access编写代码的时候,我们会写函数方便调用。 函数有的不带参数,有的带参数。这个参数是一个变量。那么这个变量在代码中是如何编写的呢? 比如有函数AutoNumber(FieldName As String, TableNam...
15316   2018-08-23

Access关于颜色的一些设置

在Access中,我们有时需要设置字体颜色,背景颜色等。 比如当内容是A时显示为红色, B时显示为蓝色,如下图所示: 详细源码: If Me.Text0 = "A" Then Me.Box2...
在access中,我们喜欢用子窗体来显示数据集。系统也自带了记录导航按钮。非常方便。 只需要设置窗体导航按钮属性为“是” 即可 但是自带的导航是固定的。如果想修改一下样式,位置。那么我们就需要自定义导航按钮了。如何自定义呢: 在...
14595   2018-08-03

Access设置窗体的记录源

在Access中,可以非常简单的绑定窗体的记录源。在窗体 属性-记录源 中选择表,查询或者自己写SQL语句就可以了。 有时候我们因为数据窗体的不同,使用的数据源也不一样。所以需要动态设置窗体的记录源。 前面我们讲过如果设置子窗体的记录源《A...
在Access中,可以用Msgbox 提示信息。但是显示的信息也不是无限长的。到底可以显示多长的信息呢? Msgbox可显示字符串提示信息的最大长度是1024 所以在显示Prompt消息前,最好用函数len判断一下长度(当然超过了...
每年都有大批的学子需要考计算机二级考试。也有很大一部分选择access,而编程类的操作题会难到很多人。 这里给出一道完全平方数的解法。若一个数能表示成某个整数的平方的形式,则称这个数为完全平方数。 如1024=32*32 就是完全平方数,这...
在前面的内容中《VBA 随机产生4位或6位数字用作验证码》,我们知道可以使用以下公式生成某个范围内的随机整数 Int((upperbound - lowerbound + 1) * Rnd + lowerbound) 这里,upperb...
有网友在使用access通用平台中用到自动编号。但是平台定义的所有自动编号格式是前缀+固定位数的编号。 这位网友希望的格式是前缀+编号(位数是不固定的)。即自然数1向上递增到2位数,就是自然增长.如C-1....到C-10 如图所示,每一...
10/19