按键模块程序设计

实验11 模块与VBA程序设计

一、实验目的

1、掌握建立标准模块及窗体模块的方法 2、熟悉VBA开发环境及数据类型

3、掌握常量、变量、函数及其表达式的用法

4、掌握程序设计的顺序结构、分支结构、循环结构 5、了解VBA的过程及参数传递

6、掌握变量的定义方法和不同的作用域和生存期 7、了解数据库的访问技术 二、实验内容

实验11-1创建标准模块和窗体模块 1、 实验要求

在 “罗斯文.accdb” 数据库中创建一个标准模块“M1”，并添加过程“P1”和“P2”。 2、 实验步骤

（1） 打开“罗斯文.accdb”数据库，选择“创建”选项卡→“宏与代码”组→单击“模

块”按钮，打开VBE窗口。选择“插入”→过程，弹出过程对话框，如图11-1所示。

图 11-1 VBE菜单栏及插入菜单的下拉菜单

（2） 在过程对话框中“名称”文本框输入“P1”,“类型”栏选择“子程序”，“范围”栏

选择“公共的”，单击“确定”，如图11-2所示。

图 11-2 添加过程

（3） 在代码窗口中输入 “P1”的子过程代码，如图11-3所示。

图 11-3 P1子过程代码

（4） 单击“视图”→“立即窗口”菜单命令，打开立即窗口，并在立即窗口中输入“Call

P1(

实验二 模块化程序设计 实验目的

(1) 体验结构化程序设计方法要点，理解模块化设计的思想，划分子模块的原则 (2) 掌握is函数的定义和调用

实验内容

任务一 输出m-n之间所有的素数（ex02_06.cpp）

改写（ sample02_07.cpp ）保存为ex02_06.cpp：输出m-n之间所有的素数，调用int isprime(int n)函数，每行输出10个素数。 sample02_07.cpp

/*求100以内的全部素数，每行输出10个。素数就是只能被1和自身整除的正整数，1不是素数，2是素数。*/

/* 使用嵌套循环求100以内的全部素数 */ #include #include /* 调用求平方根函数，需要包含数学库 */ int main(void) {

int count, i, m, n;

count = 0; /* count记录素数的个数，用于控制输出格式 */ for(m = 2; m <= 100; m++){ n = sqrt(m);

for(i = 2; i <= n; i++)

if(m % i == 0) break; if(i > n){

实验二 模块化程序设计 实验目的

(1) 体验结构化程序设计方法要点，理解模块化设计的思想，划分子模块的原则 (2) 掌握is函数的定义和调用

实验内容

任务一 输出m-n之间所有的素数（ex02_06.cpp）

改写（ sample02_07.cpp ）保存为ex02_06.cpp：输出m-n之间所有的素数，调用int isprime(int n)函数，每行输出10个素数。 sample02_07.cpp

/*求100以内的全部素数，每行输出10个。素数就是只能被1和自身整除的正整数，1不是素数，2是素数。*/

/* 使用嵌套循环求100以内的全部素数 */ #include #include /* 调用求平方根函数，需要包含数学库 */ int main(void) {

int count, i, m, n;

count = 0; /* count记录素数的个数，用于控制输出格式 */ for(m = 2; m <= 100; m++){ n = sqrt(m);

for(i = 2; i <= n; i++)

if(m % i == 0) break; if(i > n){

第6章 模块化程序设计

本章内容提示：VB应用程序是由一系列过程组成的，前面各章所涉及的例题和习题，除了定义一些公共的常量、变量或数组以外，编写的代码都写在事件过程中。而实际应用中，往往要根据问题的复杂程度，按照结构化程序设计的思想，将应用程序按功能划分为若干个模块，每个模块还可以继续细分为子模块，每个子模块完成具体的任务，模块和子模块均是可被重复调用的程序段，由编写人员按照一定的格式建立，称为用户自定义过程（本书简称过程）。VB中的过程分为Function过程和Sub过程。

教学基本要求：了解应用程序设计中引入过程的目的和意义；掌握过程定义、调用方法以及过程调用过程中参数传递的形式和特点；掌握变量、过程作用域及其对程序运行结果的影响；了解过程的递归调用；培养学生模块化程序设计思想。

6.1 模块化程序设计思想概述

所谓模块化设计，是指在程序设计中将一个复杂的算法系统分解成若干相对独立、功能单一的模块，并利用这些模块积木式地组合成所需的全部程序。采用模块化思想设计的程序系统具有以下三个特点：第一，由于模块间是相互独立的，所以每个模块可以独立地被理解、编写、测试、排错和修改，这就使得程序容易设计，也容易理解和阅读；第二，模块的独立性也能有效

#include

/*这一块是定义DS18B20的*/ #include \

#define uchar unsigned char #define uint unsigned int

/*这一块是负责AT24C02的*/

#include\为了调用_nop_字符的 #define OP_READ 0xa1 #define OP_WRITE 0xa0 unsigned char SavedData[7];

#define SaveKey 0 //保存数据键：第1号键 #define DisKey 1 //显示数据键：第2号键 #define SaveNumPlusKey 2 //数据自加键：第3号键

uchar atemp=0,write_dat=0;

uchar code num[10]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90}; //数字数组0-9

uchar code drop_num[10]={0x40,0x79,0x24,0x30,0x19,0x12,0x02,0x78,0x00,0x10}; //带点数字数组0-9

sbi

第8章 模和块BAV序程设计1

gxz1729110h1x1@6.3com1

第8 模块章和 章模 和VBA程序块设计 程序计设本章要求: 本要章求：1、了V解B编A环境程 、;了 编解环程境 编；程环境 、2握掌BV编A程础基：常，变量量，达表式 、;掌握编 基础：程 程编础 基常量变量，,表达式； 3、握掌序顺制控选，控制，择环控循 制、握顺掌控制，选择序控制，4、 解了BA模V 、了解 块块模

本章点：要 章本要：点掌顺握控制序选择，控，制 掌顺序握控制选择，制控循，环制控学时排安：学时 安排:6时(学理论+)6时(学实践) 学(理时论+6)时(学践)实学 时2zg1972x0111xh163@.cmo

第8 章块和模 模块和章VA程B序计 程序设计● 设模的概念 块●V A程B序计设础 基● 常标准函数用● VBA的程序构 ● V结BA的据数库程编 ●过调用和参数程递

3

zgx传1720111hx91@36c.om

第章8模块 章和 模和VBA程块序计设 序程计在A设cecss统中系把宏、,窗和报表等对象结体 合起来，不编用程写序码代就可建立以能较功善 完数的库据管系理统但宏。的能功有局是性限的它， 只处理能些简单一操的，如作要果实功现强

第8章 模和块BAV序程设计1

gxz1729110h1x1@6.3com1

第8 模块章和 章模 和VBA程序块设计 程序计设本章要求: 本要章求：1、了V解B编A环境程 、;了 编解环程境 编；程环境 、2握掌BV编A程础基：常，变量量，达表式 、;掌握编 基础：程 程编础 基常量变量，,表达式； 3、握掌序顺制控选，控制，择环控循 制、握顺掌控制，选择序控制，4、 解了BA模V 、了解 块块模

本章点：要 章本要：点掌顺握控制序选择，控，制 掌顺序握控制选择，制控循，环制控学时排安：学时 安排:6时(学理论+)6时(学实践) 学(理时论+6)时(学践)实学 时2zg1972x0111xh163@.cmo

第8 章块和模 模块和章VA程B序计 程序设计● 设模的概念 块●V A程B序计设础 基● 常标准函数用● VBA的程序构 ● V结BA的据数库程编 ●过调用和参数程递

3

zgx传1720111hx91@36c.om

第章8模块 章和 模和VBA程块序计设 序程计在A设cecss统中系把宏、,窗和报表等对象结体 合起来，不编用程写序码代就可建立以能较功善 完数的库据管系理统但宏。的能功有局是性限的它， 只处理能些简单一操的，如作要果实功现强

第9章 模块与VBA程序设计_习题

一、选择题

1．模块是存储代码的容器，其中窗体就是一种（ ）。A

A．类模块 B．标准模块 C．子过程 D．函数过程 2．使用Dim声明变量，若省略“As类型”，则所创建的变量默认为（ ）。C A．Integer B．String C．Variant D．不合法变量 3．函数Len(\数据库\的值是（ ）。A

A．9 B．12 C．15 D．18

4．函数Right(Left(Mid(\Access_DataBase\,10,3),2),1)的值是（ ）。A A．a B．B C．t D．空格 5．在下列逻辑表达式中，能正确表示条件“m和n至少有一个为偶数”的是（ ）。C

A．m Mod 2 = 1 Or n Mod 2 = 1 B．m Mod 2 = 1 And n Mod 2 = 1 C．m Mod 2 = 0 Or n M

单片机按键程序设计及电路设计

在单片机应用系统中，按键主要有两种形式：1、直接按键； 2、矩阵编码键盘。直接按键的每个按键都单独接到单片机的一个I/O口上，直接按键则通过判断按键端口的电位即可识别按键操作；而矩阵键盘通过行列交叉按键编码进行识别。下面我们以S51增强型单片机实验板的直接按键来学习单片机轻触按键在单片机系统中的应用。

S51增强型单片机轻触按键原理图

图 1

一、

按键时序分析

通常所用的按键为轻触机械开关，正常情况下按键的接点是断开的，当我们按压按钮时，由于机械触点的弹性作用，一个按键开关在闭合时不会马上稳定地接通，在断开时也不会一下子断开。因而机械触点在闭合及断开的瞬间均伴随有一连串的抖动，按键的时序如下图2所示，抖动时间的长短由按键的机械特性及操作人员按键动作决定，一般为5ms～20ms；按键稳定闭合时间的长短是由操作人员的按键按压时间长短决定的，一般为零点几秒至数秒不等。

二、

轻触按键操作时序示意图

图 2

从上面图2中我们可以看到，一次完整的击键过程，包含以下5个阶段： 1. 等待阶段： 此时按键尚未按下，处于空闲阶段。

2. 前沿（闭合）抖动阶段：此时按键刚刚按下，但按键信号还处于抖动状态，这个时间一般为

第6章 循环结构程序设计

许多问题的求解归结为重复执行的操作,例如输入多个同学的成绩、对象遍历、迭代求根等问题。这种重复执行的操作在程序设计语言中用循环控制来实现。几乎所有实用程序都包含循环。特别是在现代多媒体处理程序（图像、声音、通讯）中，循环更是必不可少。

根据开始循环的初始条件和结束循环的条件不同，C语言中用如下语句实现循环 (1) while语句。 (2) do-while语句。 (3) for语句。

(4) 用goto语句和if语句构成循环。

循环结构在程序设计中十分重要。所谓循环结构就是当给定条件成立时，反复执行某段程序，直到条件不成立时为止。给定的条件称为循环条件，反复执行的程序段称为循环体。

6.1 while语句

while语句最简单的情况为循环体只有一个语句，其形式如下： while(表达式) 语句；

但是，while语句通常使用更复杂的形式，也就是其一般形式： while(表达式) {

语句序列； }

其中表达式是循环条件，语句序列为循环体。其执行过程是：先计算while后面圆括号内表达式的

假（0）值，如果其值为真（非0），则执行语句序列