vb程序设计实例100

第1章 Visual Basic程序设计概述 【内容概要】

Visual Basic是一种面向对象的可视化程序设计语言，是目前在Windows操作平台上广泛使用的Windows应用程序开发工具。本章主要介绍了Visual Basic的发展和特点、Visual Basic的安装、启动和退出、Visual Basic的集成开发环境、面向对象程序设计方法、对象的概念、Visual Basic应用程序的创建与管理、窗体与基本控件。 【基础知识】

? Visual Basic的发展和特点

? Visual Basic的安装、启动和退出 ? ? ? 【重点知识】

? ? ? 面向对象程序设计方法 对象的概念

属性、事件和方法

Visual Basic的集成开发环境

Visual Basic应用程序的创建与管理 窗体与基本控件

1.1 初步认识Visual Basic开发环境

实例1.1 设计一个在窗体上显示文字信息的应用程序。

图1.1 Visual Basic 6.0的标题栏

【实例说明】

（1）程序只有一个窗体。

（2）单击窗体时，在窗体上显示文字“欢迎进入Visual Basic的精彩世界！”。 （3）运行后界面如图1.1所示。 【实例分析】

第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 串口通信线（三

第1章 Visual Basic程序设计概述 【内容概要】

Visual Basic是一种面向对象的可视化程序设计语言，是目前在Windows操作平台上广泛使用的Windows应用程序开发工具。本章主要介绍了Visual Basic的发展和特点、Visual Basic的安装、启动和退出、Visual Basic的集成开发环境、面向对象程序设计方法、对象的概念、Visual Basic应用程序的创建与管理、窗体与基本控件。 【基础知识】

? Visual Basic的发展和特点

? Visual Basic的安装、启动和退出 ? ? ? 【重点知识】

? ? ? 面向对象程序设计方法 对象的概念

属性、事件和方法

Visual Basic的集成开发环境

Visual Basic应用程序的创建与管理 窗体与基本控件

1.1 初步认识Visual Basic开发环境

实例1.1 设计一个在窗体上显示文字信息的应用程序。

图1.1 Visual Basic 6.0的标题栏

【实例说明】

（1）程序只有一个窗体。

（2）单击窗体时，在窗体上显示文字“欢迎进入Visual Basic的精彩世界！”。 （3）运行后界面如图1.1所示。 【实例分析】

第1章 Visual Basic程序设计概述 【内容概要】

Visual Basic是一种面向对象的可视化程序设计语言，是目前在Windows操作平台上广泛使用的Windows应用程序开发工具。本章主要介绍了Visual Basic的发展和特点、Visual Basic的安装、启动和退出、Visual Basic的集成开发环境、面向对象程序设计方法、对象的概念、Visual Basic应用程序的创建与管理、窗体与基本控件。 【基础知识】

? Visual Basic的发展和特点

? Visual Basic的安装、启动和退出 ? ? ? 【重点知识】

? ? ? 面向对象程序设计方法 对象的概念

属性、事件和方法

Visual Basic的集成开发环境

Visual Basic应用程序的创建与管理 窗体与基本控件

1.1 初步认识Visual Basic开发环境

实例1.1 设计一个在窗体上显示文字信息的应用程序。

图1.1 Visual Basic 6.0的标题栏

【实例说明】

（1）程序只有一个窗体。

（2）单击窗体时，在窗体上显示文字“欢迎进入Visual Basic的精彩世界！”。 （3）运行后界面如图1.1所示。 【实例分析】

VB可视化程序设计实例——小时钟

本例专门针对程序设计初学者而设计，尤其适合第一次接触VB的学生学习。通过用VB来设计如图3.39所示的时钟程序，初步感受一下可视化和面向对象的程序设计过程。

图3.39 时钟程序运行效果

小时钟程序中包含窗体控件、标签控件和计时器控件等3个控件。窗体控件是小时钟程序运行时的窗口，标题栏上的标题是“时钟”，在右上角有最小化、最大化和关闭按钮。标签控件可以用来显示文本，本例中用来显示时间，如“9:48:57”。计时器控件每秒一次把计算机的当前系统时间显示到标签控件中，使得小时钟不停地运行。

时钟窗体控件 小时钟 在时钟窗体控件中用来显示时间的标签控件 每秒一次把计算机系统时间显示到标签控件中的计时器控件

启动VB，首先显示“新建工程”对话框（图3.40），在选择“新建”选项卡中的“标准EXE”项后，单击“打开”按钮，进入VB编程环境，如图3.41所示。

图3.40 “新建工程”对话框

工具箱 属性窗口 窗体窗口 窗体布局窗口 工程资源管理器窗口 图3.41 VB可视化编程环境

除了标题栏、菜单栏和标准工具栏外，编程环境中还有工具箱、窗体和属性等窗口。 双击工具箱（图3.4

《VISUAL BASIC》教学执行大纲

(试行稿)

[适用于计算机应用专业(学分制) 100学时]

(二○○八年二月制订)

一、课程内容 （一）概 论

1、VISUAL BASIC发展概述 2、VB.NET 语言及特点简介 3、VB.NET集成开发环境

（二）数据类型与运算表达式

1、 对象和类 2、 属性、事件和方法 3、 变量与数据类型 4、 运算符与表达式 5、 结构类型及其数组

(三)控制结构

1、 顺序结构 2、 选择结构 3、 循环结构 4、 其他控制语句

（四） 数 组

1、 数组定义及基本操作 2、 数组排序 3、 结构类型及引用 4、 结构数组及应用

（五）函数过程

1、 函数过程的定义和调用 2、 子过程的定义与调用 3、 参数传递 4、 函数的递归调用

1

（六）常用标准控件

1、 常用控件 2、 鼠标事件 3、 键盘事件 4、 用户界面设计

（七）文件操作

1、 文件及其结构 2、 顺序访问模式 3、 随机访问模式

（八）数据库

练习一

一、选择题

1、下面列出的程序设计语言中（ A ）是面向问题的语言。 A、机器语言 B、汇编语言

C、高级语言 D、0、1二进制语言

解释：机器语言和汇编语言都是面向机器的语言，二进制语言为机器语言，故其为面向机器的语言 2、下面列出的程序设计语言中（ C ）不是面向对象的语言。 A、C B、C++ C、Java D、VB 3、下列（ D ）不属于VB 6.0的版本。

A、学习版 B、专业版 C、企业版 D、共享版

解释：VB6.0共有三个版本：标准版、专业版、企业版。而其中的标准版是为初学者了解基于windows的应用程序开发而设计的，也可称为学习版。 二、填空题

1、从程序设计语言发展过程的角度来分类，计算机程序设计语言分：机器语言、汇编语言和高级语言。 2、VB 6.0采用了面向对象、事件驱动（可视化编程）的编程机制。

3、启动VB 6.0后可以从“现存”选项卡选择并打开系统中现存的工程文件。

练习二

一、选择题

1、如果窗体对象的名称为Forma1，Backcolor是窗体对象的一个属性，用来设置窗体的背景色，那么设置窗体背景色为

练习一

一、选择题

1、下面列出的程序设计语言中（ A ）是面向问题的语言。 A、机器语言 B、汇编语言

C、高级语言 D、0、1二进制语言

解释：机器语言和汇编语言都是面向机器的语言，二进制语言为机器语言，故其为面向机器的语言 2、下面列出的程序设计语言中（ C ）不是面向对象的语言。 A、C B、C++ C、Java D、VB 3、下列（ D ）不属于VB 6.0的版本。

A、学习版 B、专业版 C、企业版 D、共享版

解释：VB6.0共有三个版本：标准版、专业版、企业版。而其中的标准版是为初学者了解基于windows的应用程序开发而设计的，也可称为学习版。 二、填空题

1、从程序设计语言发展过程的角度来分类，计算机程序设计语言分：机器语言、汇编语言和高级语言。 2、VB 6.0采用了面向对象、事件驱动（可视化编程）的编程机制。

3、启动VB 6.0后可以从“现存”选项卡选择并打开系统中现存的工程文件。

练习二

一、选择题

1、如果窗体对象的名称为Forma1，Backcolor是窗体对象的一个属性，用来设置窗体的背景色，那么设置窗体背景色为

VB程序设计部分 重点程序

08管理VB程序设计部分1.

几里德算法）求两个自然数的最大公约数的算法。

（欧Private Sub Form_Click() Dim n%, m%, g%

n = InputBox("输入N") m = InputBox("输入M") g = gcd(n, m)

Print n; "和"; m; "的最大公约数是："; g Private Function gcd(ByVal a%, ByVal b%) End Sub

Dim r As Integer r = a Mod b Do While r <> 0 a = b b = r

gcd = b

Loop r = a Mod b End Function

2. 存放在数组编写一个数组，随机产生compare中，并从中找出一个最12个两位数，大数和一个最小数