内容发布更新时间 : 2024/5/20 11:11:26星期一 下面是文章的全部内容请认真阅读。

第九章程序设计基础

教学目标：

? 理解什么是程序

? 掌握程序设计的基本方法

? 编写并调试简单的VBA应用程序 ? 编写简单的事件驱动程序

? 会在VBA应用程序中访问数据库 教学过程：

一、程序设计概述

做一件事，计算机可以把它分解为一系列的基本操作步骤，通过程序设计语言的基本语句来完成，这就是程序。

程序设计方法主要有两种：面向过程的结构化程序设计方法和面向对象的程序设计方法。前面所学的窗体对象设计就是一种面向对象的设计方法。

在Access中编写程序使用的语言是Visual Basic for Application，简单VBA。首先看一下VBA编写的几个简单程序。

例9-1 在窗体上放置一个命令按钮和一个文本框，单击命令按钮后在文本框中显示“VBA程序设计” 步骤如下：

1、打开数据库，切换到“窗体”对象下，双击“在设计视图中创建窗体”，

2、添加文本框，在对应的属性窗口“全部”选项卡的第一行设置名称为“文本1”，添加命令按钮，名称为“命令0”

3、打开“按钮”的属性窗口，在“事件”选项卡下的“单击”栏选“事件过程”，单击后面的按钮，进入编辑窗口：

单击此按钮，输入程 序。

4、在编辑窗口中输入如下程序：（其实窗口中已有，所以我们只要在中间添加一句 Private Sub 命令0_Click()

文本1.Value=“VBA程序设计” End Sub

说明： 1、 程序的开头“Private Sub”和结束“End Sub”是一个固定搭配，表示这是一个过程，程序中的“命令0_Click( )”表示这个程序在“命令0”按钮被单击时执行。 2、 在编辑窗口已有程序的开头和结尾，所以我们只要输入中间的一句：文本1.value=“VBA程序设计” 3、 注意程序中引用的“命令0”，“文本1”一定要和窗体中的按钮、文本框名称一致。 5、关闭程序编辑窗口，切换到窗体视图，则单击命令按钮后，“VBA程序设计”即显示在文本框中。

思考 在上面的窗体中再添加一个按钮，单击则清除文本框中显示的文本，应该怎样操作？ 例9-2 在窗体中有一个命令按钮和两个文本框，用户在第一个文本框中输入一个正整数，当单击该按钮时计算出这个正整数的阶乘，并在第二个文本框中显示计算结果。 步骤：

1、 新建一个窗体，拖入两个文本框和一个命令按钮，名称为文本1、文本2、命令0（这三

个控件名称后面程序中要引用，所以一定要命名！）

2、 选中按钮，打开其属性窗口，在“事件”选项下的“单击”一栏，选“事件过程”，单

击后面的按钮，输入如下程序：

说明： 1、 程序中变量在使用前要先定义，这里计算阶乘，用到的只能是整数，所以定义a、b、c为整型变量。（见中间程序部分的第一句：Dim a As Integer） 2、 单引号后面的是程序的注释语句，只起说明的作用，程序并不执行它。不输入这些语句，程序照样正常运行。（见绿色部分） 3、 输入程序时可以用小写字母输入单词，但每一个关键词的第一个字母计算机会自动变成大写。（见程序中蓝色部分） 4、 程序一般一句一行，也可多个句子写在一行，中间用冒号隔开；如果一句太长，需要分成多行，可在上一行的最后加下划线“_”，系统就会把上下两行连在一起做为一个语句。

3、关闭程序编辑窗口，切换到窗体视图，我们输入5，单击“计算”按钮，则会显示120， （实际上，5！=1×2×3×4×5,计算结果是120）