ACCESS及VBA可以通过微软的CDO来发送邮件， （不需要安装其他控件和引用DLL库文件）这样使用非常方便，比调用Outlook的MAPI更加方便 Dim objEmail As Object Dim strName As...

'模块中的代码 Option Explicit Public Const SHGFI_DISPLAYNAME = &H200 Public Const SHGFI_EXETYPE = &H2000 Public Const ...

1.多值字段有一个字段名 及 字段名.value 2.在查询中可使用字段名 与 字段名.value 3.多值字段本身就是一个记录集，可以设置为 Set childRs = rs("多值字段名").Value Set rs = db.Op...

在编写程序的时候，是否有想过看看自己写了多少行代码呢？当然代码行数不是衡量工作量的标准了。 下面代码能返回当前数据库中的代码行数。包括独立模块，窗体和报表的代码行数。 同时，也列出每个对象中的行数，和给出每种类型模块的数量和每种类型的行数的...

在日常工作中，我们希望程序有提示功能。在某个时间点或者预设值提示信息 在Windows操作系统中，我们常常可以看到某软件会在右下角自动弹出消息供参考阅读 在access中，我们也可以通过API函数来判断系统状态栏的位置，让窗体在右下角任...

在Access中，我们不但可以遍历读取自己库中的表，也可以读取其他数据库中的表。 获取Access数据表可参阅：《获取Access数据库中所有表或查询的方法》 如果要读取D盘的db.accdb数据库中的表呢？ 在相关事件中运行下面...

用Access开发的应用程序需要系统安装有Access才能正常打开。在不安装整个Access的情况下，是否有办法运行Access文件呢？ 答案是肯定的。只需要安装AccessRuntime就可以。 但是有时在完整版office中运行没问题，...

很多时候，我们都需要获取文件夹下的所有文件进行处理。 前面我们分享个一个示例《Access获取文件夹内的文件名及路径》，可以获取文件夹的文件名及路径。 但是如果文件夹下还有文件夹，子文件夹等，即获取不到更下层的文件了。 如下图所示，获取...

论坛有老用户提问到关于显示点击的控件问题，即窗体中有若干标签（label），如何能知道当前被点击的是哪个？ 如下图所示，当点击标签时，显示点击到标签标题 版主roych在一番斥责后，给出了答案，用onclick对象返回“属性”窗口中“...

在论坛中，我们可以轻松搜索到自定义的自动编号函数。可以直接调用使用，如下： access创建自定义递增自动编号（不固定位数）  一个用于自定义自动编号的通用函数（支持数字型、文本型编号，支持断号重续） 高效的年月日的自动编号函...

有网友在使用access通用平台中用到自动编号。但是平台定义的所有自动编号格式是前缀+固定位数的编号。 这位网友希望的格式是前缀+编号（位数是不固定的）。即自然数1向上递增到2位数，就是自然增长.如C-1....到C-10 如图所示，每一...

在VBE窗口中，我们可以通过工具-引用，引用相关的库类文件。只有引用了才能调用。 在引用一些库类时，往往是本地计算机有，在其他未必有。所以我们需要判断有成功引用对象。 在VBA中， 通过一个自定义的函数来查看所有引用。 Functi...

有时我们在其他软件中导出得到一串秒数。希望把改秒数转化为时分秒00:00:00的格式 这里需要自定义一个函数去转换 Function SecToTime(dblSecond As Double) As String SecToTim...

 网友“网速很慢”希望从一张Excel总表中，按其中一列进行拆分表。同时同一样的记录追加到该表中 “我的这个表有好多行。 比如姓名行 刘德华原表10行 拆出刘德华这个表，里面有刘德华10条数据” 如有表“表1...

在Access应用程序中，我们有时需要对注册表做一些更改以更好地展示Access的用户体验。 如何对注册表进行修改呢？这里列举3种方法。 方法一： 直接将要修改的键值保存为一个 *.reg 文件，用注册表编辑器导出某一键值就可以自动生成对应...