百度360必应搜狗淘宝本站头条
当前位置:网站首页 > 技术资源 > 正文

Access数据库宏与VBA代码的使用(精品一)

moboyou 2025-06-10 00:03 51 浏览

Access数据库的宏相当于实现某一功能的一系列命令和操作,我们无需写代码,系统已经将主体代码集成一块,我们只需要做一些简单的操作即可,而VBA代码则是实实在在的代码写到程序里面,我们可以自己编写,也可以将宏转换为VBA代码然后进行修改和编辑。

宏的使用

下面我们先来学习宏的使用,首先创建一个能够实现简单功能的宏,点击创建选项卡,选择宏后,一个宏就创建好了,点击右键保存,命名后,可以添加我们想要实现特定功能的宏:

可以看到右侧有很多种类型的宏,我们选择“用户界面命令”中的一种“MessageBox”宏,这个宏的功能就是在运行它的时候能够弹出一个对话框,对话框上可以显示我们想要的信息,当然还可以对其它一些属性进行设置,将图标直接拖到主体区域即可,直接出现了下面的界面:

可以看到,在消息一行我们键入想要弹出的信息,第二行就是是否发出声音,第三行是发出警告,第四行是标题:

设置好这个宏后,我们可以运行一下,运行有两种方法,一种是在宏打开状态下,点击设计选项卡下的叹号,这个和我们之前讲过的查询比较类似,点击后即是运行状态啦,第二种是将这个宏关闭,然后在宏模块下找到这个宏双击即可运行,看看运行后的结果是什么样子:

可以很清楚地看到,在弹出的对话框上的信息都是按照我们的意愿设计的,有标题和信息,还有警告,点击确定就没啦。

大家可以看到,这个宏是可以折叠的,点击左上角的小十字就实现了,如果想展开,点击它就可以了,如果将它关闭再次想要修改的时候,可以在左侧窗格内右键点击该宏,进入设计视图就可以修改了:

除了直接创建宏的方法,我们还有一种创建宏的方法,就是通过窗体中的控件来实现宏的创建,首先创建一个空白窗体,在窗体上加一个“按钮”控件:

加完“按钮”之后,在属性表中选择“事件”选项,在右侧的浏览选择“宏生成器”

点击确定,可以看到这个界面和我们直接创建宏是一样的了,我们可以在右侧找到相应的宏拖到界面当中即可:

继续键入弹出消息标题等:

此时,运行窗体,然后点击窗体上的按钮,就会弹出这个对话框:

其实,我们也可以在界面中的下拉条中选择宏命令,只要熟悉这些宏命令,是可以轻松找到的:

VBA代码的创建

Access数据库的VBA代码窗口,给我们提供了编程的平台,我们可以通过这个平台来写一些自己想要实现一些特定功能的代码。VBA代码的书写格式比较简单,所以没有学过编程的人也同样可以轻车熟路,只要仔细学习都能够成为数据库的编程高手。

下面我们先来创建一个VBA代码窗口,点击创建选项卡,在“宏与代码”中,可以看到模块、类模块和Visual Basic编辑器,这些都可以进入到VBA代码窗口:

下面这个就是弹出的Visual Basic编辑器,可以看到有菜单栏、工具栏、工程管理器和代码窗口等:

我们在代码窗口可以写代码,这些代码是对Access数据库中的对象进行操作的,VBA是嵌入到数据库内部的,与我们最简单的VB6.0软件最大的不同就是在语法格式上对对象的引用不同,在VB6.0软件中,我们对数据库的引用相对要繁琐一些,因为它是属于数据库外部的,而VBA是在数据库内部的,引用要简单一些,可以打个比方,一个班级只有一个人叫小明,所以老师直接点小明,大家都知道指的是谁,如果一个学校点名,点小明,就有可能有重名的,所以必须指定是哪个年级和哪个班级的小明。

我们还可以通过窗体中的对象事件来打开Visual Basic编辑器,打开窗体的设计视图,选择对象按钮后,在属性表中事件的单击项中选择事件过程:

然后,点击右侧的浏览,则Visual Basic编辑器就打开了,就可以进行我们的代码编写啦,在代码窗口中有对象和过程,可以实现不同的功能和操作:

我们还可以通过视图打开立即窗口和监视窗口等,这些窗口都是在代码调试过程中起作用的,而在左侧的资源管理器中是管理主体程序和各种模块以及类模块用的:

VBA代码子程序和函数

首先,我们创建一个空白窗体,将窗体上放置一个按钮控件:

点击该按钮的事件选项,选择右侧的浏览标识后,会弹出VBA代码编辑器:

此时,我们可以在代码窗口编写代码,我们在单击按钮事件中加入这个代码【MsgBox ("弹出消息框")】:

当我们运行窗体,点击控件时,这些代码就会执行,而实现的功能就是弹出一个消息框,我们将刚刚创建的窗体进行保存后,运行窗体进入到窗体视图后,点击按钮就会响应这些代码,可以看到点击按钮后弹出了一个消息框:

其实,我们还可以通过定义一个过程,用单击事件来调用这个过程,也可以实现类似的功能,那么如何定义一个过程呢?首先进入到VBA代码编辑器,点击菜单栏的插入,选择过程后,就会出现下面的界面:

我们为这个过程起个名称,类型选择“子程序”,范围选择“公共的”,点击确定后,在xxk()过程中加入弹出消息框代码,并且在按钮单击事件中调用这个过程,实际相当于调用子程序:

此时,我们保存窗体,运行窗体点击按钮就会出现下面的界面,这个功能和我们刚刚的功能是完全一样的,这样做的好处是,在别的事件中也可以调用同样功能的子过程,这样可以减少代码的编写:

我们也可以定义函数,然后在事件在调用定义好的函数,如何定义函数呢?在进入到VBA代码编辑器,点击菜单栏的插入,选择过程后,在弹出的界面中类型项选择“函数”,确定后,可以发现在下面我们可以去定义函数了:

下面我们定义一个函数,也让它实现弹出一个消息框,用法基本与子程序是一致的:

运行窗体,进入窗体视图来看看效果,可以看到弹出函数定义的信息啦:

VBA代码创建“属性”

首先打开VBA代码编辑器,选择添加过程:

在弹出的对话框中,类型选择属性并给这个属性一个名称:

可以看到,在程序窗口中多出一些属性代码,上面的属性代码表示获取,下面的属性代码表示设置:

在进行属性代码编写前,我们要定义一个字符串变量,以便我们在属性代码中使用,那么如何定义一个字符串变量呢?其实也比较简单,我们只需要在最上面的位置定义即可,定义的语法格式是固定的:

属性中Property Let是设置变量用的,而Property Get是取回属性用的:

运行窗体后,点击按钮,可以看到下面的效果:

从之前我们讲到的了程序和函数有什么区别呢,其实了程序是没有返回值的,而函数却可以有返回值的。

结语:喜欢的请关注、转发,下期更精彩!

相关推荐

Excel技巧:SHEETSNA函数一键提取所有工作表名称批量生产目录

首先介绍一下此函数:SHEETSNAME函数用于获取工作表的名称,有三个可选参数。语法:=SHEETSNAME([参照区域],[结果方向],[工作表范围])(参照区域,可选。给出参照,只返回参照单元格...

Excel HOUR函数:“小时”提取器_excel+hour函数提取器怎么用

一、函数概述HOUR函数是Excel中用于提取时间值小时部分的日期时间函数,返回0(12:00AM)到23(11:00PM)之间的整数。该函数在时间数据分析、考勤统计、日程安排等场景中应用广泛。语...

Filter+Search信息管理不再难|多条件|模糊查找|Excel函数应用

原创版权所有介绍一个信息管理系统,要求可以实现:多条件、模糊查找,手动输入的内容能去空格。先看效果,如下图动画演示这样的一个效果要怎样实现呢?本文所用函数有Filter和Search。先用filter...

FILTER函数介绍及经典用法12:FILTER+切片器的应用

EXCEL函数技巧:FILTER经典用法12。FILTER+切片器制作筛选按钮。FILTER的函数的经典用法12是用FILTER的函数和切片器制作一个筛选按钮。像左边的原始数据,右边想要制作一...

office办公应用网站推荐_office办公软件大全

以下是针对Office办公应用(Word/Excel/PPT等)的免费学习网站推荐,涵盖官方教程、综合平台及垂直领域资源,适合不同学习需求:一、官方权威资源1.微软Office官方培训...

WPS/Excel职场办公最常用的60个函数大全(含卡片),效率翻倍!

办公最常用的60个函数大全:从入门到精通,效率翻倍!在职场中,WPS/Excel几乎是每个人都离不开的工具,而函数则是其灵魂。掌握常用的函数,不仅能大幅提升工作效率,还能让你在数据处理、报表分析、自动...

收藏|查找神器Xlookup全集|一篇就够|Excel函数|图解教程

原创版权所有全程图解,方便阅读,内容比较多,请先收藏!Xlookup是Vlookup的升级函数,解决了Vlookup的所有缺点,可以完全取代Vlookup,学完本文后你将可以应对所有的查找难题,内容...

批量查询快递总耗时?用Excel这个公式,自动计算揽收到签收天数

批量查询快递总耗时?用Excel这个公式,自动计算揽收到签收天数在电商运营、物流对账等工作中,经常需要统计快递“揽收到签收”的耗时——比如判断某快递公司是否符合“3天内送达”的服务承...

Excel函数公式教程(490个实例详解)

Excel函数公式教程(490个实例详解)管理层的财务人员为什么那么厉害?就是因为他们精通excel技能!财务人员在日常工作中,经常会用到Excel财务函数公式,比如财务报表分析、工资核算、库存管理等...

Excel(WPS表格)Tocol函数应用技巧案例解读,建议收藏备用!

工作中,经常需要从多个单元格区域中提取唯一值,如体育赛事报名信息中提取唯一的参赛者信息等,此时如果复制粘贴然后去重,效率就会很低。如果能合理利用Tocol函数,将会极大地提高工作效率。一、功能及语法结...

Excel中的SCAN函数公式,把计算过程理清,你就会了

Excel新版本里面,除了出现非常好用的xlookup,Filter公式之外,还更新一批自定义函数,可以像写代码一样写公式其中SCAN函数公式,也非常强大,它是一个循环函数,今天来了解这个函数公式的计...

Excel(WPS表格)中多列去重就用Tocol+Unique组合函数,简单高效

在数据的分析和处理中,“去重”一直是绕不开的话题,如果单列去重,可以使用Unique函数完成,如果多列去重,如下图:从数据信息中可以看到,每位参赛者参加了多项运动,如果想知道去重后的参赛者有多少人,该...

Excel(WPS表格)函数Groupby,聚合统计,快速提高效率!

在前期的内容中,我们讲了很多的统计函数,如Sum系列、Average系列、Count系列、Rank系列等等……但如果用一个函数实现类似数据透视表的功能,就必须用Groupby函数,按指定字段进行聚合汇...

Excel新版本,IFS函数公式,太强大了!

我们举一个工作实例,现在需要计算业务员的奖励数据,右边是公司的奖励标准:在新版本的函数公式出来之前,我们需要使用IF函数公式来解决1、IF函数公式IF函数公式由三个参数组成,IF(判断条件,对的时候返...

Excel不用函数公式数据透视表,1秒完成多列项目汇总统计

如何将这里的多组数据进行汇总统计?每组数据当中一列是不同菜品,另一列就是该菜品的销售数量。如何进行汇总统计得到所有的菜品销售数量的求和、技术、平均、最大、最小值等数据?不用函数公式和数据透视表,一秒就...