蓝牙通信模块程序设计

实验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开发串口通信程序既可以使用MSComm控件也可以调用Windows API函数实现。不过，只要MSComm控件可以被选用，我们推荐选择此控件实现，因为MSComm控件的功能和API调用一样强，甚至比它还好且使用起来更加简单。

在本章提供的串口通信程序设计中，除了PC与PC串口通信外，PC与单片机、PC与智能仪表、PC与PLC、PC与GSM短信模块等串口通信任务的实现均采用MSComm控件。

6.1 PC与PC串口通信程序设计

当两台串口设备通信距离较近时，可以直接连接，最简单的情况，在通信中只需3根线（发送线、接收线、信号地线）便可实现全双工异步串行通信。

本设计通过两台PC串口3线连接，介绍了利用API函数和MSComm控件设计串口通信程序的方法，包括字符与文件的发送与接收。

6.1.1 PC与PC串口通信程序设计目的

（1）掌握PC与PC串口通信的线路连接方法。

（2）利用MSComm控件和API函数实现PC与PC串口通信的程序设计方法。

6.1.2 PC与PC串口通信程序设计用软、硬件

本设计用到的硬件和软件清单如表6-1所示。

表6-1 序 号 1 2 3 PC或IPC 串口

VB串口通信程序设计典型实例

利用VB开发串口通信程序既可以使用MSComm控件也可以调用Windows API函数实现。不过，只要MSComm控件可以被选用，我们推荐选择此控件实现，因为MSComm控件的功能和API调用一样强，甚至比它还好且使用起来更加简单。

在本章提供的串口通信程序设计中，除了PC与PC串口通信外，PC与单片机、PC与智能仪表、PC与PLC、PC与GSM短信模块等串口通信任务的实现均采用MSComm控件。

6.1 PC与PC串口通信程序设计

当两台串口设备通信距离较近时，可以直接连接，最简单的情况，在通信中只需3根线（发送线、接收线、信号地线）便可实现全双工异步串行通信。

本设计通过两台PC串口3线连接，介绍了利用API函数和MSComm控件设计串口通信程序的方法，包括字符与文件的发送与接收。

6.1.1 PC与PC串口通信程序设计目的

（1）掌握PC与PC串口通信的线路连接方法。

（2）利用MSComm控件和API函数实现PC与PC串口通信的程序设计方法。

6.1.2 PC与PC串口通信程序设计用软、硬件

本设计用到的硬件和软件清单如表6-1所示。

表6-1 序 号 1 2 3 PC或IPC 串口通信线（三

网络通信程序设计 课程论文 班级：08网络(1)班 姓名： 王捷 学号：081402124 指导老师： 肖东 23 目录

1、 引言 .............................................................................................. 2、 面向socket编程 ........................................................................

2.1.socket设计要求 ............................................................................................................................. 2.2.程序修改的功能 .............................................................................................

第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统中系把宏、,窗和报表等对象结体 合起来，不编用程写序码代就可建立以能较功善 完数的库据管系理统但宏。的能功有局是性限的它， 只处理能些简单一操的，如作要果实功现强