在access窗体中，我删除数据一般是通过SQL语句，或者ADO删除记录 在连续窗体中，也可以通过系统自带的筛选功能判断查询的记录是否存在，如果存在即删除 Private Sub 删除记录_Click() If IsNull...

有网友问到随机输入两个数，如何计算他们的乘积，因为想做一个类似计算器的东西。 下面分享几个简单的函数，主要是方便初学vba的入门，函数的写法。 '求两数之积函数 Function 求积(m As Double, n As Double) ...

在 Visual Basic中可以通过HWnd属性获取UserForms 的句柄，HWnd属性提供对窗体的窗口句柄的访问。 在使用与窗口相关的Windows API时，需要窗口句柄。 但是和 Visual Ba...

设计好的报表 需要打印。一般来说打印机可以选择黑白打印和彩色打印。 如何利用代码指定打印机是以彩色还是黑白来打印输出。 DoCmd.OpenReport "报表1", acViewPreview Reports("报表2").Print...

多年来，BASIC程序员一直使用Asc和Chr函数来访问和操作ASCII字符集。随着Unicode被主流操作系统和应用程序所接受，需要改进版本的Asc和Chr函数已经开发了。为了满足这种需求，针对Windows系统的Microsoft Vi...

VBA 的 Format 函数与Excel表格中TEXT 函数很相似，但Format函数功能更加多，能表示的意思更加丰富。 Format用法详解  Format( expr [ , fmt ] ) &nbs...

在应用程序中， 我们有时需要对图片或者文字颜色进行选择设置。 windows内置了颜色对话框，如果能直接调用就可方便使用。毕竟写个全颜色的对话框是非常困难的。 在模块了添加API代码 Public Type CHOOSECOL...

Excel自带 Asin Acos函数，但Access没有，可以自己用VBA来实现 一个 Access实现 Asin Acos函数（自定义函数） Const PI As Double = 3.1415926535...

在access中，我们不单单用数据库的功能，还可以利用vba做些文件操作的事 在应用程序中，有这么一个问题：用户创建文件，如果文件存在，是否覆盖还是重命名操作。 这里分享一个函数，可以对指定位置的文件重命名操作，原文件名《群发工资条示例模版...

不同的颜色给我们不同的感觉。所以生活中有不同的颜色选择，比如衣物，生活用品等 而颜色有它的反色，又叫补色。比如有黑就有白，红对应青。 下面函数用RGB取颜色的反色 对比色 Public Function GetRevColor...

在文本框中，文字可以左对齐，右对齐，居中等对齐方式，方便读者阅读数据。 可以通过TextAlign属性，设置对齐方式。0是常规，1是左对齐，2是居中对齐，3是右对齐，4是分散对齐 下面分享一个利用Rnd函数为文本框随机设置对齐方式 因...

前面的access文章中，我们讲过很多关于筛选access数据的方法 通过按钮，筛选符合条件中的连续窗体的数据，包括筛选子窗体中的数据 下面用简单的代码查询子窗体中匹配的记录，定位到指定的记录 Forms!员工工资.员工工...

access数据类型中有自动编号类型，新增数据都可以自动为数据递增1 但是如果没有选择自动编号类型，如果作为主键，即需要自己手动添加数据了，否则会报错。  下面代码对于数字类型的字段可以自动添加1 Private Sub cm...

数据统计是数据分析中必不可少的部分。在应用系统中，我们少不了统计功能 access提供了多个域聚合函数，可以非常简单的统计某个数据域的值 比如动态统计各个部门的人数  详细代码： Dim intNum As In...

在access中，可以直接设置记录源绑定到窗体 这样就可以不用一句代码，直接把数据添加到表 当然这样的坏处就是当用户还不确定是否保存时，系统也会自动保存数据到表格中 通过下面的代码，在插入之前先提示是否要添加到表 Private Su...