国开《数据库基础与应用》第十一章 11-1-4:建立模块应用举例

搜答案方法:电脑端按「Ctrl+F」、手机端用「页面查找」功能输入关键词查找。

11-1-4:建立模块应用举例

一个模块中,可以定义出一个或若干个过程,以Sub关键字为过程标记的称为普通过程,以Function为过程标记的称为函数过程,Sub过程在执行后不需要返回值,而Function过程在执行后需要返回一个值。

教材中11.2节简要地介绍了VBA语言中的基本语法知识,希望同学们自行学习。

下面通过在Access中建立、保存和运行一个模块,来了解一个标准模块对象的使用方法。

假定,在一个标准模块中编写一个用来计算两个整数相加的运算,根据用户输入的两个加数与求和结果,给出提示计算正确或错误的信息。

首先单击Access主界面上“创建”选项卡中“宏与代码”组内的“模块”图标按钮,打开VBE窗口,即代码生成器窗口,接着向模块代码区中加入一个过程名称为“两个整数相加”的Sub过程,如下图7所示。

国开《数据库基础与应用》第十一章 11-1-4:建立模块应用举例
图7 在代码生成器中输入和编辑一个模块

当开始打开VBE窗口时,系统自动建立一个名称为“模块1”的新模块,待保存该模块时,可由用户提供一个新的模块名,假定我们在图7窗口中所建立的进行加法求和的模块,当保存时使用的名称为“两个整数相加模块”。一个模块建立并保存后,将自动在主界面左侧的任务导航窗格中的模块对象栏内,添加一个该模块的名称条目,以后双击该名称,将自动打开VBE编辑环境,并把该模块内容显示在代码编辑区域内,以便用户编辑和运行。

在此Sub过程中,包含有5条VBA语句:

Sub 两个整数加法()

Dim Num1 As Integer, Num2 As Integer, Num3 As Integer

Num1 = InputBox("请输入一个整数:")

Num2 = InputBox("请再输入一个整数:")

Num3 = InputBox("请输入" & Num1 & "与" & Num2 & "的和:")

If Num1 + Num2 = Num3 Then

If Num1 + Num2 = Num3 Then

MsgBox ("计算正确!")

Else

MsgBox ("计算值" & Num3 & "错误! " & Chr(10) & Num1 & "+" & Num2 & "

之和的正确答案为 " & Num1 + Num2)

End If

End Sub

此过程输入和修改完成后,单击按钮工具栏中部的带三角箭头符号的运行按钮,可调用执行此Sub过程。在执行过程中首先在屏幕窗口显示出如下图8所示的对话框,假定输入的一个整数为26,按下“确定”按钮后,接着显示出如下图9所示的第2个对话框,假定这次输入的整数位38,按下“确定”按钮后,又显示出如下图10所示的第3个对话框,要求用户输入前两个整数值之和,假定输入整数72,按下“确定”按钮后,显示出如下图11所示的消息提示框,若输入的整数值为64,则显示出如下图12所示的消息提示框。

国开《数据库基础与应用》第十一章 11-1-4:建立模块应用举例 国开《数据库基础与应用》第十一章 11-1-4:建立模块应用举例
图8 输入对话框1        图9 输入对话框2
国开《数据库基础与应用》第十一章 11-1-4:建立模块应用举例
图10 输入对话框3
国开《数据库基础与应用》第十一章 11-1-4:建立模块应用举例 国开《数据库基础与应用》第十一章 11-1-4:建立模块应用举例 
图11 消息框1        图12 消息框2


「国开学习吧」:用户COOKIE有效时间30天,收藏网址『guokaixuexi.com』不迷路哦~

相关文章

国开《数据库基础与应用》第二章 2-1-2:笛卡儿积

国开《数据库基础与应用》第二章 2-1-2:笛卡儿积

2-1-2:笛卡儿积笛卡尔积是定义在一组域上的数据集合。假定n个数据域用D1、D2、...、Dn表示,则它们的笛卡尔积表示为D1×D2×...×Dn,笛卡尔积中的每个元素为一个n元组:(d1,d2,....

国开《数据库基础与应用》第四章 4-6-2:WHERE选项中的筛选条件

国开《数据库基础与应用》第四章 4-6-2:WHERE选项中的筛选条件

4-6-2:WHERE选项中的筛选条件WHERE选项中的筛选条件的作用,是从源表或连接后生成的中间表中选择出所需要的记录行。筛选条件可以是由比较运算符连接的一般比较式,也可以是适用于集合运算的专门比较...

国开《数据库基础与应用》第五章 5-2-4:机器实现

国开《数据库基础与应用》第五章 5-2-4:机器实现

5-2-4:机器实现首先把逻辑阶段设计的结果,即数据库的逻辑模式,它包括基本表和视图的定义,在具体的计算机系统中建立起来,然后按照需求分析对数据库的各种数据处理要求,给出相应的实现方法。仍然结合旅店管...

国开《数据库基础与应用》第二章 2-1-1:数据域

国开《数据库基础与应用》第二章 2-1-1:数据域

2-1-1:数据域数据域是具有相同特性的一个数据集合。例如,{1,3,5,7,9,…,99};{男,女};{东,南,西,北};{A,B,C,…X,Y,Z}。一个域中所含元素的个数称为该域的基数。如性别...

国开《数据库基础与应用》第五章 5-2-3:逻辑设计

国开《数据库基础与应用》第五章 5-2-3:逻辑设计

5-2-3:逻辑设计根据上一步概念设计得到的4个基本表:即客房表、住宿表、消费卡表和旅客登记表,以及5个视图表:即客房空闲表、住宿费表、伙食费表、娱乐费表和催补款表,以及它们之间的内在联系。creat...

国开《数据库基础与应用》第十一章 上机实验

国开《数据库基础与应用》第十一章 上机实验

上机实验 实验准备:了解和掌握文字教材第11章的全部内容。 实验目的:能够启动和进入Access数据库管理系统操作环境,能够打开一个数据库文件,能够建立用户所需要的各种绑定型和非绑...

国开《数据库基础与应用》第九章 上机实验

国开《数据库基础与应用》第九章 上机实验

上机实验 实验准备:了解和掌握文字教材第9章的全部内容。 实验目的:能够启动和进入Access数据库管理系统操作环境,能够打开一个数据库文件,能够建立用户所需要的各种绑定型和非绑定...

国开《数据库基础与应用》第三章 3-1-3:平凡和非平凡函数依赖

国开《数据库基础与应用》第三章 3-1-3:平凡和非平凡函数依赖

3-1-3:平凡和非平凡函数依赖定义:设一个关系为R(U),X和Y为属性集U上的子集,若X→Y且X不包含Y,称X→Y为非平凡函数依赖,否则若X⊇Y称X→Y为平凡函数依赖。若X⊇Y,则平凡函数依赖X→Y...

发表评论    

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。