vb程序设计

1珙职高教案

第1章VisualBasic6.0概述

[课程引入]：

先用教师机播放《VB教学实例程序演示系统》软件，将几个用VB编写的、有

趣的典型应用程序实例，例如：倒计时、滚动字幕、学生学籍管理、自制IE浏览

器等演示给学生，引入本课程，以提高学生的感性认识及学习兴趣。

[课堂提问及讨论]：

有哪些同学见过或使用过VB应用程序？试举例说明。

[知识点讲解]：

1.1程序设计基础

一、程序设计几个概念

1、程序：是为解决某一问题而编写的语句集合，是将一个实际问题的具体

操作用某种程序设计语言描述出来的指令序列。

2、程序设计：是分析问题、编写程序、调试程序的过程。

3、程序设计语言：是人们根据描述问题的需要而设计的，有固定的符号和

语法规则、是计算机能够识别的人机交流所使用的语言。

二、程序设计语言的发展概况

1、机器语言

2、汇编语言

3、高级语言

1.2VisualBasic6.0简介

一、VisualBasic6.0简介

1、概念：VisualBasic6.0简称VB,是Windows环境下可视化的、面向对

象的程序设计开发工具。

其中：Visual英文原意是“可视的”、“视觉的”。6.0是版本号。

2、VB功能：用它可以开发数学计算、数据库管理、客户/服务器软件、通

讯软件、多媒体及Internet/Intranet软件等。其功能之强大绝非是早期Basic

所能比拟的，其直观、通俗易懂，特别适合于初学者。

3、VB发展过程：美国微软公司于1991年推出VB1.0版至今已经历了6个

2珙职高教案

版本。

4、VB中常用的几个基本概念：

面向对象：面向对象编程是建立在类的基础上的，其通过类的封装而使源程

序更加便于维护。

事件驱动：在事件驱动模式下，程序的执行是依靠系统能够被识别的触发事

件启动的。

5、VB的版本：

VB6.0是MicrosoftVisualStudio开发工具组件中的一员，它共有3个版

本：标准版、专业版、企业版。教学中采用企业版。

6、运行环境

操作系统：NTServer4.0、Windows98，或更高版本。

CPU：486DX/66MHz或更高的处理器。

内存：Windows95／98下要求16MB以上的内存，WindowsNT下要求32MB

以上。

磁盘空间：对于标准版或专业版，典型安装48MB，完全安装80MB。对于企

业版，典型安装128MB，完全安装147MB。

其他设备：CD-ROM驱动器，鼠标。

7、VB特点：

◇具有面向对象的可视化设计工具；

◇事件驱动的程序运行机制；

◇提供了易学易用的应用程序集成开发环境。

◇结构化的程序设亭子的简笔画 计语言；

◇支持多种数据库系统的访问；

◇支持动态数据交换、动态链接库和对象嵌入技术；

◇完备的联机帮助功能。

8、VB安装（略）、帮助系统的使用（略）

二、VisualBasic6.0启动、退出

1、VB的启动

3珙职高教案

双击桌面上的VB快捷方式图标，或单击桌面上“开始”按钮→“程序”→

MicrosoftVisualBasic6.0中文版→MicrosoftVisualBasic6.0中文版，

都可以启动VB6.0。

2、VB的退出

单击关闭按钮、ALT+F4快捷键、或通过菜单命令“文件退出”均可关闭并

退出VB集成环境。

[课堂练习]：

1、课后习题1：２。

2、预习本章后面内容，思考课后习题1：3、6。

[答疑]：针对学生提出的问题答疑。

[小结]：本节主要讲解VisualBasic6.0可视化编程的基本概念、发展过程、

特点及其启动、退出的方法。要求掌握全部知识点。

[作业]：上机熟悉VisualBasic6.0的启动、退出及界面组成。

预习第2章内容。

4珙职高教案

1.3VB的可视化开发环境

[复习]：以提问的方式，复习上节所讲知识，检查学生掌握情况。

[引入]：启动VB后，同学们见到的VB开发环境由哪几部分组成？这个问题即是

本节要讲的内容。

[知识点讲解]：

一、VB的界面组成

VB的界面由标题栏、菜单栏、工具栏、控件箱、窗体编辑窗口、工程资源管

理窗口、属性窗口、窗体布局窗口等组成。（如教材图2-2所示）

二、VB各部分功能简介

1、菜单栏：是在集成开发环境下发布命令的最基本手段。VisualBasic顶

级菜单有：文件、编辑、视图、工程、格式、运行、查询、图表、工具、外接程

序、窗口、帮助，但菜单命令是通过子菜单中的子菜单项发出的。

文件菜单：主要用于建立、打开、添加、移去、保存工程和文件，包括：新

建工程、打开工程、添加工程、移除工程、保存工程、工程另存为、保存

文件、文件另存为、打印、打印设置等子菜单项。

编辑菜单：在对工程进行修改时，编辑菜单用于各种编辑操作。包括：撤消、

重复、剪切、复制、粘贴、粘贴链接、删除、全选、查找、缩进、凸出、插入文

件、属性方法列表、快速信息、参数信息书签等子菜单项。

视图菜单：视图菜单用于显示各种窗口及和窗口有关的操作。包括：代码窗

口、对象窗口、定义、最后位置、对行草 象浏览器、立即窗口、本地窗口、监视窗口、

调用堆栈、工程资源管理器、属性窗口、窗体布局窗口、属性页、表、缩放、显

示窗格、工具箱、调色板、工具栏等子菜单项。

工程菜单：用于为当前工程创建模块、作对象引用或提供各种设计器。包括：

添加窗体、添加MDI窗体、添加模块、添加用户控件、添加属性页、添加用户

文档、添加设计器、添加文件、移除、引用、部件、工程属性等子菜单项。

格式菜单：用于界面设计，能使界面中的控件按规范排列。包括：对齐、统

一尺寸、按网格调整大小、水平间距、垂直间距、锁定控件等子菜单项。

5珙职高教案

调试菜单：用于调试、监视程序。包括：逐语句、逐过程、跳出、运行到光

标处、添加监视、编辑监视、快速监视、切换断点、清除所有断点等子菜单项。

查询菜单：各条命令用于数据库表的查询及相关操作。所提供的各种查询设

计工具，使用户能够通过可视化工具创建SQL语句，实现对数据库的查询、修改。

运行菜单：用于执行程序。包括：启动、全编译执行、中断、结束、重新启

动等子菜单项。

工具菜单包括：添加过程、过程属性、菜单编辑器、选项、发布等子菜单项。

外接程序菜单用于为当前工程创建含有：可视化数据管理器、外接程序管理

器等子菜单项。

窗口菜单：用于调整已打开窗口的排列方式。包括：拆分、水平平辅、垂直

平铺、层叠、排列图标等子菜单项。

帮助菜单：用于给用户提供各种方式的帮助。包括：内容、索引、搜索、技

术支持等子菜单项。

[课堂练习1]：

提问：若将界面上的某窗口误操作关闭，如何通过菜单将其重新打开？

2、VisualBasic6.0工具栏

工具栏的作用是可以通过单击其上面的图标按钮执行菜单命令，由此加快操

作速度。

VisualBasic能提供“编辑”、“标准”、“窗体编辑器”、“调试”等几个工具

栏，用户也可以按自己的需要，通过“视图工具栏”菜单来选取“自定义”工

具栏。

3、VisualBasic6.0控件箱（又称工具箱）

控件箱是VisualBasic为程序界面开发而提供控件的面板。默认为内置控件。

除了VisualBasic内置控件之外，用户还可以通过菜单“工程部件”打

开“部件”对话框，从中能添加控件、设计器或可插入对象到工具箱中，也可以

引用已加载的控件工程。

4、工程管理器窗口

工程管理器又称工程资源管理器，它以层次列表的方式管理当前工程文件或

6珙职高教案

工程组文件中所包含的窗体文件、模块文件、类模块文件等3种类型的文件。

5、属性窗口

属性窗口用于显示和设置窗体或控件的所有属性。它由3部分组成：对象列

表框、属性列表框、属性含义说明。

6、窗体布局窗口

窗体布局窗口用于确定程序运行时窗体在屏幕上的初始位置。

除了以上基本部分外，在VB程序设计中还有一个重要的窗口，即代码编辑

窗口。

[课堂练习2]：

试设置默认窗体的背景颜色为红色，字体的颜色为黄色，试着在它上面“画”

几个控件。

[答疑]：针对学生提出的问题答疑。

[小结]本章节主要讲VisualBasic6.0集成开发环境界面组成。本节内容可作

为“字典”备查，不需全部掌握，编程用到时，再返回本节查看。重点掌握：文

件、运行菜单；控件箱、属性窗口的使用即可。

[作业]上机熟悉VisualBasic6.0的启动、退出及界面组成，控件箱、属性窗

口的使用。

7珙职高教案

1.4VB可视化编程概念

1.5可视化编程初识

[复习]：上节所讲VisualBasic6.0集成开发环境界面组成。

[实例引入]：VB的第一个实例——“欢迎进入奇妙的VB世界”。先演示此例的

运行结果，用以引入本节内容。

[知识点讲解]：

一、VB编程中用到的几个概念

1、对象：（object）是代码和数据的集合，在VB环境中，常用的对象有工具

箱中的控件、窗体、菜单、应用程序的部件，以及数据库等。

对象有三个特征：属性、事件和方法。

对象的属性：VB中每个对象都有一组特征，这组特征称为属性。

属性设置方法：先选定对象，然后在属性窗口中找到相应属性直接设置；或

编程在代码中设置，格式为：对象名属性名=属性值。

2、事件：对象的事件（Event）就是对象上所发生的事情。VB中事件是预先

定义好的，能够被对象是别的动作，如：单击事件（Click）、双击事件（Dblclick）、

装载事件（Load）、鼠标移动事件（MouMove）等。对象的事件是固定的，用户

不能建立新的事件，程序员只需编写必须相应的事件过程即可。

事件过程的一般编写格式为：

Sub

……

程序代码

……

Endsub

3、方法：事件的方法与事件过程类似，它可能函数或过程，用于完成某种特

定功能，而不能相应某个事件。如：对象打印方法（Print）、窗体显示方法（Show）、

移动方法（Move）等。可用以下格式调用对象方法：对象名方法名。例如：

Form1Show

8珙职高教案

二、VB可视化编程的步骤

一般步骤为：打开VB→新建工程→添加控件、设计应用程序界面→设置属性

→编写代码→运行工程→修改工程→保存工程。

1、新建工程：

步骤：启动VB→新建工程，标准EXE。或者文件菜单→新建工程→标准EXE。

2、添加控件、设计应用程序界面：

方法：单击工具箱中的某控件图标，鼠标变成“+”指针，然后在窗体工作

区按住鼠标左键拖动鼠标，松开即可在窗体上画出对应控件。

3、属性设置：先选定对象，然后在属性窗口中找到相应属性直接设置；或

编程在代码中设置，格式为：对象名属性名=属性值。

4、编写代码：打开代码编辑器，单击“对象”下拉列表框，从中选取相应

对象，单击“过程”下拉列表框，从中选取相应事件，然后编写代码。

5、运行工程：单击工具栏上的“运行”按钮或按F5键，即可运行工程。单

击“退出”按钮或标题栏上的“关闭”按钮，即可结束工程运行。

6、保存工程：单击“文件”菜单→“保存工程”或“工程另存为”或单击

工具栏上的“保存工程”，即可保存工程。

三、实例：

实例1：VB的第一个实例——“欢迎进入奇妙的VB世界”。运行结果如图

2-8所示。程序界面由一个文本框和一个命令按钮组成，单击命令按钮时，文

本框会出现“欢迎进入奇妙的VB世界”字样。详见教材P10-12。

具体操作步骤如下：

1、设计界面：

在窗体上画一个一个文本框和一个命令按钮。

2、设置属性：

按表2-1设置各对象的属性：

控件名属性名属性设置值

窗体Form1caption欢迎进入奇妙的

9珙职高教案

VB世界

文本框Text1text

命令按钮Command1caption确定

3、编写代码：

命令按钮Command1的click事件过程代码为：

=”欢迎进入奇妙的VB世界”

4、运行应用程序：

选择“运行|启动”、F5键、单击工具栏上“启动”按钮都可以运行该示例

程序。

5、保存工程：

单击工具栏上的“保存”按钮即可保存该工程和窗体文件。

（详细讲解并演示以上几个步骤的制作过程）

[课堂练习]：上机实现以上实例。

[答疑]：针对学生提出的问题答疑。

[小结]可视化编程的概念、程序调试步骤。

习题1：

思考：习题2、3、5、6、7；

上机：熟悉VB的界面，编程并上机实现：习题7。

10珙职高教案

1.5可视化编程初识

[复习及作业讲解]：

1、复习VB应用程序调试的全过程。

2、讲解作业7题，并以此引入“工程”的概念。

[知识点讲解]：

一、VB的开发模式

VB提供了3种开发模式：设计模式、运行模式和中断模式。

二、VB工程概述

1、工程文件(.vbp)：VB使用了称为“工程”的特殊文件来管理应用程序中所

有不同的文件。它提供了与该工程有关的全部文件和对象的清单，每当保存工程

时，VB都要更新工程文件。一个完整的工程中的文件包括：

◇跟踪所有部件的工程文件（.vbp）；

◇窗体文件（.frm）；

◇窗体所对应二进制数据文件（.frx）；

◇标准模块文件（.bas）。

2、工程管理

（1）新建工程：“文件|新建工程”、选择类型后“确定”。

（2）打开工程：“文件|打开工程”。

（3）保存工程：两种方法：直接保存和工程另存为。

（4）向工程中添加文件：“工程|添加文件”将现存的文件添加到当前的工

程文件中。

（5）从工程中删除文件：在工程资源管理器中先选定要删除的文件，然后

再选择“工程|移除文件”移除。

3、启动窗体的设置：

可以将工程中的任一个窗体设置为启动窗体，方法是：“工程|xxx属性…”，

其中xxx为当前工程的名称。

[课堂练习]：查看上节实例（第1个VB实例）所生成的工程文件及其他文件，

注意其扩展名。

11珙职高教案

[答疑]：针对学生提出的问题答疑。

[小结]：本节主要讲解工程的概念、工程文件的组成、工程的管理等。要求了

解工程文件的组成，掌握工程文件的保存、打开方法。

[作业]：P18，习题2。

笔答：习题1、2、3、4、6、10；

上机：熟悉VB的工程，编程并上机实现：习题13。

[拓展与提高]：试将习题13贴上一幅自己喜欢的图片。

12珙职高教案

第3章VB简单应用程序的设计

[复习、提问]：以提问方式复习上节所讲VisualBasic6.0工程知识。

[实例演示、引入]：前面章节实例中用到的命令按钮、文本框等统称为——控件。

在窗体上任意画若干个控件，演示其常见属性的设置，大小、位置的调整。用以

引入本节内容。

[知识点讲解]：

3.1控件概述

一、控件概述

1、控件：是建立VB应用程序的基本元素。可视化程序设计就是通过控件实

现的。

2、VB的控件分类：分为三大类：内部固有控件、ActiveX控件、可插入的对

象。用户可以通过“工具箱”获取各种内部控件。

内部控件是包含在VisualBasic系统内，可以直接使用的控件；因此具有相

对较好的运行性能。

3、常用的内部控件有：命令按钮、文本框、标签、框架、列表框、组合框、

复选框、选项按钮、图片框、定时器、数据控件等。

3.2控件的常用属性

1、属性的设置方法：

有两种方法：一种是通过属性窗口来直接设置，另一种是在代码中设置。即：

对象名称．属性名称=设置值

例如：Command1．Caption=“确定”

用代码设置的方法常用于动态地修改控件的有关属性。

2、控件的常用属性

Caption属性：也称标题属性，用于设置在控件上显示的文本内容。

Name属性：对象在创建时所取的名字。编代码引用该对象时使用，这个名字

不会出现在窗体上，且每个对象都有。

Enabled属性：决定了对象在运行时是否允许用户操作。

13珙职高教案

Font属性：用于设置字符的格式，如字体、字号、字形等。

Height、Width、Top、Left属性：决定控件的大小、位置。

ForeColor、BackColor：分别设置对象的背景色、前景色。

3.3控件的格式化

1、控件的添加/删除：

两种方法：单击拖动、双击再移动。

2、控件的大小与位置：

控件的位置调整有两种方法：一是用鼠标拖动对象，二是使用Ctrl+方向键。

3、窗体与控件的布局调整：

两种方法：一是通过“格式”菜单，二是通过“窗体编辑器”。

[课堂练习]：上机练习：在窗体上任意画若干个控件，试完成其常见属性的设置，

大小、位置的调整。

3.4基本控件的使用

一、标签（Label）

1、Label（标签）控件是专门用来显示文本的，因此用户不能对标签内的

文本进行编辑。

2、一般被用作标题名。通常用标签来标注本身不具有Caption属性的控件。

例如，可用Label控件为文本框、列表框、组合框等控件添加描述性的文字。

3、标签常用的属性有：

Caption属性：缺省属性，设置标签中显示的文本内容。

AutoSize属性：设置控件是否能自动调整以显示所有的内容。

WordWrap属性：该属性设置是否扩大以显示标题文字。

二、命令按钮（CommandButton）

1、当用户需要交互式地控制应用程序的时候，最简便的方法就是给用户提

供一个“命令按钮”。

2、命令按钮的作用是：在用户单击它时，将会激发它的Click事件。因此，

将代码写入命令按钮的Click事件过程，通过用户单击就可以执行相关操作。

3、命令按钮的常用属性有：

14珙职高教案

Cancel属性：用于设置按钮为取消按钮。

Caption属性：用于设置在命令按钮上显示的文本。

Style属性：设置命令按钮的外观。

三、文本框（TextBox）

1、TextBox（文本框）控件一般是用来接收或显示输入输出信息，可用于编

辑文本。

2、经常使用的文本框属性有：

Text属性：用于设置显示的文本内容。

MaxLength属性：用于设置文本框中输入字符串的长度限制。

MultiLine属性：用于设置文本框是否以多行方式显示文本。

PasswordChar属性：用于设置是否显示用户键入的字符。

ScrollBars属性：用于设置文本框是否有垂直或水平滚动条。

[答疑]：针对学生提出的问题答疑。

[小结]本节主要讲三种基本控件的编程使用。要点：三种基本控件的常用属性的

设置和编程实现。

[习题]

预习：实例1、2、3。

思考：习题3：2、4、5。

15珙职高教案

3.4基本控件的使用——例题

[提问]：以提问方式复习上节所讲VB6.0控件知识。

[实例演示]：演示实例3-1，用以引入本节内容。

[知识点讲解]：

例题讲解：

1、讲解并演示教材P27例3-1。

实现步骤、编程代码：如教材P27（略）

[课堂练习1]：上机实现例3-1。

2、讲解并演示教材P28例3-2。

[课堂练习2]：上机实现例3-2。

3、演示教材P31例3-3。

[课堂练习3]：上机实现例3-3。

[答疑]：针对学生提出的问题答疑。

[小结]本节主要以实例形式讲解三种基本控件的编程思路及编程方法。要求掌握

重点语句的使用。

[习题]习题32、4、5。

编程并上机实现：7、11、12。

要求：交上机作业。每人通过网络上传一个文件夹，文件夹以班级、姓名、

学号为名字，内含3个可执行文件（EXE文件）。记一次平时成绩。

16珙职高教案

“基本控件的使用”——习题课

[学生演示]：指定学生演示实例3-1、3-3，检查学生例题掌握情况，并给其记

一次平时成绩。

[学生作业讲评]：针对所交作业中出现的共同问题讲评。

[知识点讲解]：

例1：课后习题P33-7。

设计步骤（同以前例题，略），程序代码如下：

PrivateSubForm_MouDown(ButtonAsInteger,ShiftAsInteger,XAs

Single,YAsSingle)

IfButton=1Then

e=LoadPicture("c:programfilesmicrosoftofficeoffice10b

")

El

e=LoadPicture("")

EndIf

EndSub

[课堂练习1]：学生上机实现例1。

例2：程序结果为分别在窗体上显示“今天是：”后分别显示当前年月日、时

分秒。制作步骤（略），程序代码如下：

PrivateSubCommand1_Click()

n="欢迎使用："&Chr(13)&Chr(13)&"VB6"

EndSub

PrivateSubCommand2_Click()

n="今天是："&Chr(13)&Chr(13)&Year(Date)&"年"

_

&Month(Date)&"月"&Day(Date)&"日"&Chr(13)&Chr(13)&Hour(Time)

17珙职高教案

&"时"&Minute(Time)&"分"&Second(Time)&"秒"

EndSub

PrivateSubCommand3_Click()

UnloadMe

EndSub

[课堂练习2]：学生上机实现例2。

例3：P33习题12，程序结果如图3-10，程序代码如下

PrivateSubCommand1_Click()‘红灯

e=LoadPicture("c:programfilesMicrosoftvisual

studiocommon……")

e=fal

e=fal

EndSub

另两段代码类似（略）。

[课堂练习3]：学生上机实现例3。

[答疑]：针对学生提出的问题答疑。

[小结]本节主要通过课后习题讲解，使用学生训练掌握三种基本控件的编程知识

及技巧。

[习题]课后实验1，P243实验二、2（1）-（2）。

要求：交上机作业P243实验二、2（1）-（2）。每人通过网络上传一个文件夹，

文件夹以班级姓名学号为名，内含2个可执行文件（EXE文件）。

18珙职高教案

[学生演示]：指定学生演示课后实验1，P243二、2（1）-（2）。，检查学生作

业情况，并给其记一次平时成绩。

[学生作业讲评]：针对以上演示中出现的问题讲评。

[知识点讲解]：

第4章代码基础及程序结构

4.1数据类型

一、常量与变量

1、常量：是用标识符表示永远不变的数值或字符串。

值得注意的是：常量不能象对变量那样在程序运行过程中给常量标识符赋以

新值。

常量有两种来源：内部的或系统定义的，其由VisualBasic系统或引用的对

象提供；用户自定义的，其需要用Const语句来声明。

用户自定义常量：

用户自定义常量在使用前需要声明，由此使该标识符能够被程序识别。其语

法是：

[Public/Private]Const常量名[As类型]=常量表达式

例如：

ConstconPi=3.979

ConstconMaxPlanetsAsInteger=9

一旦已定义常量，就可将其放置在代码中使用。

2、变量：

在VisualBasic中执行应用程序期间，用变量临时存储数据。变量有名字

（变量标识符）和数据类型（确定变量能够存储的数据的种类）。

可以把变量看作内存中存放未知值的地震应急包 所在处。

声明变量：声明变量就是事先将变量通知程序，由此使变量的使用合法。

语法：Dim/Private/Public/Static变量名[As类型]

例如：

DimIAsInteger

19珙职高教案

PrivateYourNameAsString,BillsPaidAsCurrency

PublicTest,Amount,JAsInteger

变量范围：变量的范围确定了能够知晓该变量存在的那部分代码。

一个变量在划定范围时被看作是过程级变量、模块级变量，或是公用变量。

这取决于声明该变量时采用的方式。

过程级变量：过程级变量只有在声明它们的过程中才能被识别，也称它们为

局部变量。局部变量只能用Dim高原红原唱 或Static关键字来声明它们。例如：

DimintTempAsInteger

StaticintPermanentAsInteger

用Dim声明的变量只在过程执行期间才存在。

而用Static声明的局部变量，则在整个应用程序运行期一直存在，称做：

静态变量。

模块级变量：模块级变量对该模块（包括：标准模块、窗体模块、类模块）

的所有过程都可用，但对其他模块的代码不可用。可在模块顶部的声明段用

Private或Dim关键字声明模块级变量。例如：

PrivateintTempAsInteger

公用变量：为了使模块级的变量在其他模块中也有效，需要用Public关键

字声明。经过Public关键字声明的变量是公用变量，其值可用于应用程序的所

有过程。只能在模块的声明段中用Public关键字声明公用变量，例如：

PublicintTempAsInteger

二、数据类型：

所有变量都具有数据类型，以决定能够存储哪种数据。变量的数据类型决定

了如何将代表这些值的位存储到计算机的内存中。

除变量外，数据类型也用于其他场合。如在给对象属性赋值时，这个值就有

数据类型；函数的参数也有数据类型。事实上，在VisualBasic中，凡是涉及

数据就与数据类型有关，包括：变量、常量、数组，以及函数、过程中的参数。

1、数值型数据

20珙职高教案

VisualBasic支持几种数值数据类型—Integer（整型）、Long（长整型）、

Single（单精度浮点型）、Double（双精度浮点型）、Currency（货币型），另外，

Byte（字节型）也可用于数值计算。

所有数值变量都可相互赋值。在将浮点数赋予整数之前，VisualBasic

将浮点数的小数部分四舍五入到整数。

2、String数据类型

String型变量用于存储字符串，如下列语句：

DimSAsString

S="Databa"

在缺省情况下，String型变量是一个可变长度的字符串变量，随着对其赋予

新数据，它的长度可增可减。但也可以声明具有固定长度String型变量，语

法是：

Dim/Private/Public/StaticvariablenameString*size

3、Boolean数据类型

若变量的值只是“true/fal”、“yes/no”、“on/off”信息，则可将它声明

为Boolean类型。Boolean的缺省值为Fal。

4、Date数据类型

用于存储Date和Time值，VisualBasic接受许多种文字的Date和Time

格式。例如：

DimSomeDateAsDate

SomeDate=#1980-03-16

#SomeDate=#3-6-9313:20

#SomeDate=#March27，19931:20am

#5、Object数据类型

Object变量采用32位（4个字节）地址来存储对象，该地址可引用应用程

序中或某些其他应用程序中的对象。可以随后（用Set语句）指定一个被声明

为Object的变量去引用应用程序所识别的任何实际对象，如：

DimobjDbAsObject

21珙职高教案

SetobjDb=OpenDataba("c:")

6、Variant数据类型

如果把数据赋予Variant变量，则不必在这些数据的类型间进行转换；

VisualBasic会自动完成任何必要的转换。例如：

DimSomeValue

SomeValue="17"

SomeValue=SomeValue-15

SomeValue="U"&SomeValue

7、自定义数据类型

在模块的声明部分可以使用Type语句建立自定义数据类型。

语法格式：

[Private|Public]Type自定义类型名

元素As类型

…

EndType

[小结]：本节主要讲解常量、变量，几种数据类型的概念。要求学生理解。

[作业]：思考：理解几种数据类型。

22珙职高教案

[复习]：几种数据类型。

[知识点讲解]：

4.2运算符和表达式

一、运算符

程序中对数据的基本加工，是依靠运算符实现的。在VisualBasic中运算

符的类型有算术运算符、字符串运算符、关系运算符、逻辑运算符。

1、算术运算符

用来进行算术运算，有：+（加）、-（减）、*（乘）、/（除）、（整除）、Mod

（求模）、^（乘方）等运算符。

2、字符串运算符

&、+运算符都能用于进行两个字符串的连接，但&运算符强制两个表达

式按字符串连接，尽管被连接的表达式不是字符串也是如此。而+运算符则较

复杂，当两个表达式都是字符串时按字符串连接，否则视具体情况会有不同结果。

因此，在进行字符串连接时一般使用&运算符。

3、运算符

关系运算符包括：<（小于）、<=（小于或等于）、>（大于）、>=（大于或

等于）、<>（不等于）和=（等于），用来反映两个数值或字符串表达式之间的

关系。关系成立，返据说英语 回True（真）；关系不成立，返回Fal（假）；两个表达式

中若有Null，则返回Null。

4、逻辑运算符

逻辑运算符包括：Not（非）、And（与）、Or（或）、Xor（异或）、Equ（逻辑

等于）和Imp（逻辑蕴涵），用于表达两个逻辑表达式之间的关系。在进行逻辑

运算时，只要参入运算的表达式中有一个为Null，则将返回Null。

5、运算符优先顺序

在表达式中，当运算符不止一种时，要先处理算术运算符，接着处理比较运

算符，然后再处理逻辑运算符。

算术运算符优先级由高至低是：指数运算(^)、负数(–)、乘法和除法(*、

/)、整数除法()、求模运算(Mod)、加法和减法(+、–)、字符串连接(&)。

23珙职高教案

逻辑运算符优先级由高至低是：Not、And、Or、Xor、Eqv、Imp。

所有比较运算符的优先顺序都相同。

二、表达式

通过常量、变量、运算符、函数等的组合，由此构成表达式。

VisualBasic中的赋值运算符“=”用来给变量、数组或对象的属性赋值，

即把运算符右边的内容（包括常量、变量、函数返回值或对象的属性）赋给运算

符左边的变量或属性。

语法格式：Variable=表达式

其中variable可以是变量、数组的元素等。表达式可以是常数、常量、变量

或函数调用，但必须有确定的值。

[例题]计算下列表达式的值。

解：2+3>5and5<3值为fal

not5<3and6-2=10+2值为true

[答疑]：针对学生提出的问题答疑。

[小结]：本节主要讲解几种运算符的作用及优先级。要求掌握并能够正确计算各

类表达式的值。

[作业]：P62习题5、6、7、8、9、10、11、12。

24珙职高教案

4.3程序流程

[复习]：几种运运算符的作用及优先级。

[讲解习题]：讲解上节课后习题。

[实例引入]：演示例题：P66-3，以引入程序流程概念。

[知识点讲解]：

一、顺序流程控制

程序的基本运行方式是自顶向下地顺序执行各条语句，被称做顺序结构。对

于简单的问题，依靠顺序结构就可以完成任务；但对于稍微复杂一点的问题，单

纯依靠顺序结构也许就不够了，而必须在程序中加入更多的控制。程序流程的控

制是通过有效的控制结构来实现的，包括：分支结构、循环结构。

二、分支结构

分支结构的作用是使程序依照条件而走不同的支路。VisualBasic支持的分

支结构有：

SelectCa

程序中，往往根据需要选择合适的分支结构。

用If...Then结构可以有条件地执行其结构内的一条或多条语句。

语法格式：

If条件表达式Then

多条语句

EndIf

可以使用If...El语句建立多个分支流程，并根据条件选择其中

一个分支。语法结构：

If条件1Then

[语句块1]

25珙职高教案

[ElIf条件2Then

[语句块2]]...

El

[语句块n]]

EndIf

SelectCa语句

类似。语法结构是：

SelectCa测试条件

[Ca表达式1

[语句块1]]

[Ca表达式2

[语句块2]]

[CaEl

[语句块n]]

EndSelect

三、循环结构

循环的作用是允许某个程序段被重复执行。VisualBasic支持的循环结构

有：

程序中，往往根据需要选择合适的循环结构。

形式一：

DoWhile条件表达式

语句块

26珙职高教案

Loop

形式二：

DoUntil条件表达式

语句块

Loop

形式二

Do

语句块

LoopWhile条件表达式

形式四：

Do

语句块

LoopUntil条件表达式

在知道要执行多少次时，则可以使用Next循环。与Do循环不同，

For循环使用一个叫做计数器的变量，每重复一次循环之后，计数器变量的值就

会增加或者减少。For循环的语法如下：

For计数器=初始值To终止值[Step增量]

语句块

Next[计数器]

其中，参数：计数器、初始值、终止值和增量都必须是数值型的变量。

一个元素作为重复依据的，而不是按次数重复。如果不知道一个集合有多少元素，

语法格式：

ForEach元素In集合

27珙职高教案

语句块

Next元素

例题勤奋学习演讲稿 ：P46例4-3详细讲解。

[答疑]：针对学生提出的问题答疑。

[小结]本节主要讲分支、循环结构程序设计。

[作业及上机安排]上机调试例题：P46例4-3

习题：P51：1-11。

28珙职高教案

4.3程序流程——例题

[复习]：几种程序流程语句。

[实例演示、讲解]：

演示、讲解例题：以掌握程序流程编程思路。

例4-4P47。代码略。

[课堂练习1]：学生上机实现例4-4。

例4-5P48。代码略。

[课堂练习2]：学生上机实现例4-5。

例4-6P49。代码略。

[课堂练习3]：学生上机实现例4-6。

例4-7P50。代码略。

[课堂练习4]：学生上机实现例4-7。

[答疑]：针对学生提出的问题答疑。

[小结]本节主要掌握几种程序流程的编程方法、思路。

[作业及上机安排]习题：P51：13、15题，要求全部编程，并上机实现。

29珙职高教案

程序流程——习题课1

[答疑]：针对编程作业中出现的问题答疑。

[实例演示、讲解]：

演示、讲解习题：以掌握程序流程编程思路。

1、演示、讲解习题4-13P51。代码略。

[课堂练习1]：学生上机实现上例。

2、演示、讲解习题4-15P51。代码如下：

PrivateSubCommand1_Click()

Dima(1To10)AsInteger

Dimb(1To10)AsInteger

Fori=1To10

a(i)=Int(100*Rnd):b(i)=a(i)

Printa(i);"-";

Nexti

Print

Print

Fori=1To9

Forj=i+1To10

Ifb(j)

Min=b(j)

b(j)=b(i)

b(i)=Min

EndIf

Nextj

Printb(i);"-";

Nexti

Printb(i)

EndSub

30珙职高教案

[课堂练习2]：学生上机实现上例。

[答疑]：针对学生提出的问题答疑。

[小结]本节主要掌握几种程序流程的编程方法、思路,特别是排序的编程思路。

[作业及上机安排]实验11-2，实验21-4。要求全部编程，并上机实现。

31珙职高教案

程序流程——习题课2

[复习]：循环编程技巧。

[实例演示、讲解]：

演示、讲解实验2、3：以掌握程序流程编程思路。

1、演示、讲解实验2-1P245。代码略。

[课堂练习1]：学生上机实现上例。

2、演示、讲解实验3-1P245。代码如下：

PrivateSubCommand2_Click()

s=0

Fori=1To99Step2

s=s+i

Nexti

Prints

EndSub

[课堂练习2]：学生上机实现上例。

3、演示、讲解实验3-2P245。代码如下：

PrivateSubCommand3_Click()

DimiAsInteger'★☆

DimjAsInteger

Fori=6To1Step-1

PrintTab(20-2*i);"★";

Forj=1To2*i-1

Print"☆";

Nextj

Print"★"

Nexti

PrintTab(20-2*i);"☆"

'PrintTab(20-2*i);"★"

32珙职高教案

Fori=1To6

PrintTab(20-2*i);"☆";

Forj=1To2*i-1

Print"★";

Nextj

Print"☆"

Nexti

EndSub

[课堂练习3]：学生上机实现上例。

[答疑]：针对学生提出的问题答疑。

[小结]：本节重点掌握图形的编程思路——数图形、找规律，结合双层循环进行

程序设计。

[作业及上机安排]要求全部编程，并上机实现P245实验3-3、4题。

[演示实例、引入课程]：输出“圣诞树”编程实例，其中有重复输出，以引出过

程概念。

[知识点讲解]：

第5章过程和函数

过程是构成程序逻辑部件的基本单位，将程序分割成较小的逻辑部件可以简

化程序设计任务，结构化设计就是建立在这个思路之上。

在VisualBasic中使用的过程有：

Sub过程——不返回值；又被叫做子过程。

Function过程——返回值；又被叫做函数。

一、子过程

在VisualBasic中子过程包括通用过程和事件过程，它们的定义语法类似，

差别是调用方式一般不同。

通用过程往往是由程序中的语句调用。

事件过程往往是由用户事件触发。

二、通用过程

33珙职高教案

通用过程是由程序中的语句调用的过程。它一般由用户根据需要自主建立，

其作用是可以把一些公共的功能代码放在一个过程中，由此提高代码利用率，并

使其更便于维护。可以将子过程放入标准模块、类模块和窗体模块中。

定义通用过程的语法是：

[Private|Public][Static]Sub过程名(形式参数列表)

语句块EndSub

过程参数

过程的参数类似于变量声明，它声明了从调用过程传递进来的值的个数和数

据类型。例如：

PrivateSubAbut(XAsString,YAsInteger，Z)

语句块

EndSub

设置参数类型是为了限定传递信息，在没有设置过程参数类型时，其具有

Variant数据类型。调用过程

调用过程的语法：

all过程名（实际参数列表）

或：过程名实际参数列表注意：实际参数列表，是往被定义过程的形式

参数传递的数据；因此，其数据类型需要和形式参数保持一致。实际参数可以是

常量、变量、数组，或复杂表达式，但无论是什么都必须有确定的值。

三、事件过程

VB中的某个控件对象的一个事件的发生时，便自动调用该控件的该事件过

程。

例如，一个名为cmdPlay的命令按钮被单击时所调用的事件过程是：

cmdPlay_Click。窗体也属于控件，但其事件过程命名规则却和一般控件有所不

同。窗体事件名是：词汇“Form”、下划线和事件名的组合。例如，窗体单击时

所调用的事件过程是：Form_Click。

34珙职高教案

通用过程和事件过程的关系

四、函数过程

在VisualBasic中，通过Function语句创建的函数过程和通过Sub语句

创建的子过程类似。与子过程不同的是：Function过程可返回一个值到调用的

过程。

函数过程的语法是：

Function函数名(形式参数列表)[As类型]

语句块

EndFunction

函数过程需要返回的值由As子句设置。

五、调用函数过程

调用函数时可以有两种方式。

方法一：把函数看作一个数，可以放在赋值号右端。

例如：Tx1=MyFunc(5)

方法二：作为参数出现在调用过程中或函数中。

例如：Tx2=MyFunc(MyFunc(5)

六、函数过程中返回值

在函数过程内的语句块内，可以通过以下语句将值返回。

函数名=表达式例如：

FunctionHypotenu(AAsInteger,BAsInteger)AsString

Hypotenu=Sqr(A^2+B^2)

EndFunction

[综合实例]：编程实现在窗体中输出如下所示“圣诞树”。

35珙职高教案

代码如下：

PrivateSubprstr(mAsInteger,nAsInteger)

Fori=mTon

PrintTab(20-2*i);"☆";

Forj=1To2*i-1

Print"★";

Nextj

Print"☆"

Nexti

EndSub

PrivateSubCommand4_Click()

PrintTab(20-2*i);"★"

prstr1,3

prstr2,4

prstr3,5

Fori=1To6

prst虚汗怎么调理 r2,2

36珙职高教案

Nexti

EndSub

[小结]：本节主要掌握自定义过程及其调用。

[作业]：上机实现本节中实例。

37珙职高教案

[实例演示、引入本节]演示包含多种控件的实例、引入本节。

[知识点讲解]：

第5章窗体与常用控件

6.1控件应用基础

在VisualBasic中，事件是一种程序可以响应的动作。例如：用户单击某按

钮、过了一段指定的时间等，这些都可称之为事件。

事件驱动：每个控件都能识别特定类型的事件。例如：有的控件能识别鼠标

的单击动作，有的可以响应自身值的变化等。而如果希望程序中的控件响应某一

事件，则必须在事件过程中放置与该控件对应的代码，这就是事件驱动。

一、基于事件编程

VisualBasic中可能发生的事件有两种类型。

1、用户触发事件：其由用户控制。如：Click事件，KeyPress事件都属于这

种类型。

2、系统环境事件：系统环境事件是由VB系统或程序控制的事件。例如：窗

体的Load、Activate、Unload事件，时钟控件的Timer事件等。

二、编写事件过程

每个控件所能识别的事件可以从代码窗口中的下拉列表中看出来。当在控件

列表框和事件列表框中选择确定的对象和事件后，VB将自动产生该对象事件的

过程框架。

三、常见用户触发事件

1、Click、DblClick事件：当在一个对象上用鼠标单击按钮或按Enter键时，

会发生单击Click事件；如果双击鼠标按钮则会发生双击DblClick事件。

2、MouDown、MouUP和MouMove事件:都是对鼠标操作的响应。分别

在按下鼠标键时、松开鼠标键时、鼠标指针移到新的位置时发生的。

3、GotFocus、LostFocus事件：当对象获得焦点时产生GotFocus事件；当

对象失去焦点时产生LostFocus事件。

4、KeyPress、KeyDown和KeyUp事件:是对用户键盘操作的响应。当用户

按下和松开一个ANSI键时会发生KeyPress事件。KeyDown和KeyUp事件提

38珙职高教案

供了最低级的键盘响应，当焦点在某个对象上时，则按下键盘将触发该对象的

KeyDown事件，松开按键则会触发KeyUp事件。

5、Change事件：当控件的内容发生改变时会被引发。

[课堂讨论]：列举目前所见过的事件。

四、事件的顺序

大部分的控件都能响应诸如鼠标事件、键盘事件等。而这些事件往往不是单

独发生的，他们之间有许多关联性。

例如，单击鼠标时，可能会触发Click、DblClick、MouDown、MouUp等

事件；按下键盘上的键时，又可能会触发KeyPress、KeyDown、KeyUp等事件。

当焦点从某个控件移到另外一个控件时，会触发该控件的LostFocus和另一个控

件的GotFocus事件。

当一个动作会激发多个事件，而在其多个事件中都定义了代码时，就可能造

成程序的冲突。因此我们必须弄清多个事件的激活顺序，从而保证程序的正确执

行。

当Click事件和DblClick事件过程中都有代码时，只会响应Click事件。

当单击鼠标时，除了产生Click事件以外还可产生MouDown和MouUp

事件。这三种事件发生的顺序根据控件的不同而不同。

按下键盘上的键时，一般来说，键盘事件按照以下顺序发生：KeyDown、

KeyPress、和KeyUp。

五、控件数组

1、控件数组：由类型相同、名称相同、事件过程都相同的一组控件构成。

可有1—32767个元素。系统由index属性为其赋予了惟一的索引号，从0开始

起。

2、控件数组的应用：共用一段代码，一般和多分支语句lectca语句

结合使用。

3、控件数组的创立：有两种方法：一是设计时创建，先画第一个元素控件，

再复制粘贴；二是运行时创建，略。

[答疑]：针对学生提出的问题答疑。

39珙职高教案

[小结]本节理论内容讲解较多，只需重点了解几种常用事件及系统响应顺序即

可。

[作业及上机安排]上机实现例5-1，例5-2。

40珙职高教案

[学生演示]先让两个学生分别演示例5-1，例5-2，针对出现的问题讲解编程重

点。

[实例演示、引入本节]演示例5-3所示“我与地坛教案 留言薄”实例，其中包含单选、复选

按钮控件，以引入本节内容。

[知识点讲解]：

5.2单选按钮与复选框

一、单选按钮与复选框的创建

单选按钮（OptionButton）被用于做从多个可选项中仅选择一项的操作。

复选框（CheckBox）控件通常用于提供Yes/No或True/Fal的逻辑选择。

复选框可以用于多项选择。

创建单选按钮与复选框的方法与创建一般的控件相同。通常都将它们放置在

相应的控件数组中以便管理。

二、单选按钮与复选框的常用属性

单选按钮与复选框也具有诸如Name、Caption、Width、Height、ForeColor、

Enabled、Visible等常规属性，这些的设置与含义与前几章所讲的相同。特殊

属性如下：

1、Value属性指示单选按钮与复选框是否被选中，用来表示其所处的状态。

单选按钮值为true表示选中，为fal表示未选中。复选框值为0表示未

选中，为1表示选中，为2表示禁止选择。

2、style(风格)决定了单选按钮与复选框的检查风格。值为0是标准方式，

为1是图形方式。

三、单选按钮与复选框的使用

单选按钮与复选框最常用的事件是Click事件。在其编程时主要解决两个问

题：第一是当用户对单选按钮与复选框作出响应后，能准确判定出响应的位置及

其取值；第二是在程序中如何主动地设置它们的各种状态。

[例5-3]设计一个简单的留言簿，要求能改变输入文字的字体及字型。

设计步骤如下：

（1）在VB中创建一个窗体，在它上面放置1个标签、2个命令按钮（数组）、

41珙职高教案

3个单选按钮（数组）、3个复选框（数组）。

（2）设置各控件的属性如下表5-1所示：

控件数组属性名称取值

单选钮(optfont)valuetrue

命令按钮

(cmdgrp)

defaulttrue

文本框Multilane

scrollbars

True

2

(3)编写代码如下：

PrivateSubchkbiu_Click(IndexAsInteger)

'复选框数组的单击事件过程

SelectCaIndex

Ca0

ld=ld

'改变粗体状态

Ca1

alic=alic

'改变斜体状态

Ca2

derline=derline

'改变下划线状态

EndSelect

EndSub

PrivateSubcmdgrp_Click(IndexAsInteger)

IfIndex=1ThenUnloadMe

42珙职高教案

'命令按钮数组的单击事件过程

IfIndex=0Then

=""

'清除文本框,并重置焦点

us

EndIf

EndSub

PrivateSubOptfont_Click(IndexAsInteger)

'单选钮数组的单击事件过程,设置字体

IfIndex=me="宋体"

IfIndex=me="黑体"

IfIndex=me="楷体_gb2312"

EndSub

（4）进行调试，运行结果如图5-3。

[课堂练习]：

1、上机实现例5-3。

2、程序调试正确后，将其代码抄写在笔记本上。

[答疑]：针对学生提出的问题答疑。

[小结]：本节主要讲单选按钮与复选框的编程使用。要求掌握其特殊属性及编程

方法——常以控件数组形式出现、结合lect语句编程使用。

[作业及上机安排]上机实现：将例5-3中增加一组单选按钮，功能为设置字号大

小。

43珙职高教案

[学生演示]先让学生演示5-3及上节作业，针对出现的问题讲解编程重点。

[实例演示、引入本节]演示实例5-5，其中包含列表框控件，以引入本节内容。

[知识点讲解]：

5.3组合框与列表框

一、组合框与列表框

列表框（ListBox）控件用于显示项目列表。用户可以从列表框中的一系列

选项中选择一个或多个选项。

ComboBox（组合框）控件将文本框和列表框的功能结合在一起。有了这个控

件，用户可通过在组合框中输入文本来选定项目，也可从列表中选定项目。

在使用方式上，组合框具有和列表框相似的特征。

二、组合框与列表框的属性设置

特殊属性有：

List属性设置列表框中包含的项。

Columns属性设置是水平滚动还是垂直滚动。

MultiSelect属性设置是否能够做多个选择。

ListIndex属性当前所选择元素的下标。

ListCount属性列表中全部元素的个数。

Sorted属性设置按字母顺序排列项目。

组合框的特点是可由Style属性设置三种组合样式。

三、组合框与列表框的使用

列表框经常用到的操作有：

1.添加项目：列表框.AddItemitem[,index]

例如：m“王平”

2.删除项目：列表框.RemoveItemindex

例如：Item0

3.获得列表项目内容：列表框.List(index)

例如：=(2)

44珙职高教案

4.用ListIndex属性判断项目位置。

5.用ListCount属性返回项目数。

[例5-5]设计一个课程选择的窗体，运行后如教材P84图6-5。

实现步骤如下：

（1）在VB中创建一个窗体，在它上面放置3个标签、5个命令按钮、2个

列有框。

（2）设置各控件的属性如下表6-1所示：

控件名属性名称取值

列表框(lstkc)Multilect

Sorted

List

True

True

如图6-9

列表框(lstbjkc)multilecttrue

（3）代码如下：

PrivateSubCommand1_Click()‘添加

(dex)

EndSub

PrivateSubCommand2_Click()‘全部添加

Fori=unt-1

(i)

Nexti

EndSub

PrivateSubCommand3_Click()'删除选定的项

dex

EndSub

PrivateSubCommand4_Click()'删除全部项

45珙职高教案

EndSub

[课堂练习]：

1、上机实现例5-5。

2、程序调试正确后，将其代码抄写在笔记本上。

[答疑]：针对学生提出的问题答疑。

[小结]：本节主要讲组合框与列表框的编程使用。要求掌握其特殊属性及编程方

法。

[作业及上机安排]上机实现：P103，习题6-10、6-15。

46珙职高教案

[学生演示]先让学生演示6-5及上节作业，针对出现的问题讲解编程重点。

[实例演示、引入本节]演示实例6-6，其中包含滚动条控件，以引入本节内容。

[知识点讲解]：

5.4其他常用控件

5.4.1滚动条控件

一、滚动条控件

滚动条是一种模糊输入与定位的控件.当不需要精确设置数值,只要一个大

概的范围时,如音箱的音量,使用滚动条来进行输入是非常方便的.

注：由滚动条控件创建的滚动条与一般附加在文本控件上的滚动条是不一样

的。因为附加在文本控件上的滚动条是自动出现的。

二、滚动条的属性设置

min、max属性：滚动条代表的最小值、最大值，在-32768--+32767之间。

largechange属性：在滚动条上空白处单击时，滚动条数值的增减量。

smallchange属性：单击滚动条两端的滚动箭头时，滚动条数值的增减量。

value属性：滚动条的当前值。

三、滚动条的使用

滚动条的值发生变化时会引发Change事件。

[例5-6]使用滚动条模拟实现调色板。结果如图5-10。

实现步骤较简单，详见教材。主要编程方法是：在滚动条的Change事件过

程代码中，要随时取其value属性的值。

[课堂练习1]：

1、上机实现例5-6。

2、程序调试正确后，将其代码抄写在笔记本上。

6.4.2定时器控件

定时器控件即可用于处理一些与时间有关的操作。

定时器的功能是通过Timer事件实现的。Timer是周期性事件，即该事件是

按一定的时间间隔定期地产生的。Timer事件之间的时间间隔由Interval属性

来设置（毫秒数）。

47珙职高教案

定时器的工作状况由Enable属性确定。设置Enable属性为True，定时器

工作；而Enable属性为Fal，定时器则暂停工作。

[例5-7]利用定时器控件使例5-6中的调色板自动调色。

[课堂练习2]：

1、上机实现例5-7。

2、程序调试正确后，将其代码抄写在笔记本上。

[答疑]：针对学生提出的问题答疑。

[小结]本节主要要求掌握滚动条、定时器控件的几个特殊属性及编程应用的方

法。

[作业及上机安排]习题5-16。要求上机实现。

48珙职高教案

[学生演示、引入本节]先让学生演示上节作业，针对出现的问题讲解编程重点，

以引入本次习题课内容。

[知识点讲解]：

常用内部控件——习题课1

一、分析课后习题5-15、5-16。

二、给出解决问题的思路。

三、在黑板上讲解编程过程及相应语句。

四、演示具体实现步骤。

[课堂练习]：

1、上机实现习题5-15、5-16。

2、程序调试正确后，将其代码抄写在笔记本上。

[答疑]：给5分钟时间答疑。

[小结]本节主要练习滚动条、定时器控件的几个特殊属性及编程应用的方法。

[作业及上机安排]要求编程并上机实现，网上交作业。

49珙职高教案

[学生演示、引入本节]先让学生演示，实验五第1-3题，针对出现的问题讲解

编程重点，以引入本节习题课内容。[知识点讲解]：

常用内部控件——习题课2

一、分析课后实验五第1到3题。

二、给出解决问题的思路。

三、在黑板上讲解编程过程及相应语句。

四、演示具体实现步骤。

[课堂练习]：

1、上机实现实验五第1到3题。

2、程序调试正确后，将其代码抄写在笔记本上。

3、注意比较各不同控件的编程语句的异同。

[答疑]：给5分钟时间答疑。

[小结]本节主要要求掌握几种常用控件的特殊属性及编程客运合同 应用的方法及思路。

[作业及上机安排]将本节中没完成的例、习题，上机实现。

50珙职高教案

[引入本节]先让学生观察VB集成开发环境界面，查看其各项菜单，以引入本节

内容。

[知识点讲解]：

第7章菜单

7.1菜单的规划与设计

一、菜单的结构

菜单能够有效改善用户界面。它是用户界面设计中一个非常重要的内容。

1、菜单的形式：标准下拉菜单、弹出式菜单。

2、标准下拉菜单的构成：包括：菜单栏、菜单标题、菜单项、子菜单，它

们按照层次关系合理组织。

标准下拉菜单的操作特点是：当单击一个菜单标题（如“文件”）后，包含

菜单项目的列表就被拉下来。

3、菜单属性：

VB中的菜单也是对象。菜单中各个成分都可以被当作为控件对象，并具有

和命令按钮相似的属性。其主要属性有：

Name属性必须设置的菜单对象标识符。

Caption属性菜单对象标题。

Index属性菜单控件数组中元素的索引标识号。

Checked属性设置是否在菜单项旁出现复选标记。

Enabled属性设置菜单对象是否有效。

Visible属性设置菜单对象是否可见。

二、用菜单编辑器创建下拉菜单

在VisualBasic环境下可以通过菜单编辑器建立菜单。

菜单编辑器中的控件列表框列出当前窗体的所有菜单控件。通过单击“插入”

按钮可以在现有的菜单项之间增加一个菜单控件，该控件会在菜单列表框中显示

出来。可用上、下箭头调整顺序，可用左、右箭头改变菜单的层次。

三、菜单控件事件代码

51珙职高教案

每一个菜单项功能，只能通过click事件过程来实现。

四、弹出式菜单

弹出式菜单是独立于菜单栏而显示在窗体上的浮动菜单。在弹出式菜单上显

示的项目取决于按下鼠标右键时指针所处的位置；因而，弹出式菜单也被称为上

下文菜单。

弹出式菜单实质上既是下拉菜单中某个菜单标题下的菜单项列表，只是激活

方式不同而已。为了显示弹出式菜单，可使用PopupMenu方法。该方法使用语

法如下：

[object.]PopupMenumenuname[,flags[,x[,y[,boldcommand]]]]

[课堂练习]：

1、上机实现：在窗体制作一个菜单，将实验五第1到3题作为菜单项的调

用执行内容。

2、程序调试正确后，将其代码抄写在笔记本上。

[答疑]：给5分钟时间答疑。

[小结]本节主要讲解下拉菜单的制作方法，全部要求掌握。

[作业及上机安排]仿制WORD的下拉菜单，并上机实现。准备综合作业：用所学

的控件知识，给自己制作一份电子简历。要求：窗体界面整洁、美观，包括菜单、

标签、文本框、命令按钮、单选、复选、列表框、定时器、图片框等。

52珙职高教案

常用内部控件——综合练习课

[课程主要内容]：让学生上机制作自喜欢的动物 己的电子简历。

一、先给出基本要求。

用所学的控件知识，给自己制作一份电子简历。

要求：窗体界面整洁、美观；使用控件包括菜单、标签、文本框、命令按钮、

单选、复选、列表框、定时器、图片框等；简历内容自定。

二、给出简要制作提示。

三、让学生自己制作完成这份电子简历。记一次平时成绩。

[答疑]：针对学生制作过程中出现的问题，随时答疑。

[小结]本节主要培养学生的综合运用能力，将所学的常用控件知识结合自己的情

况，进行实用的综合程序设计。

[作业及上机安排]继续完成电子简历的制作。复习全书。

53珙职高教案

期末总复习1

[课程安排]：

一、将本学期所讲内容串讲一遍

二、给出期末考试题型及复习重点

可从教师机下载期末总复习题的网页型文件。

三、答疑

54珙职高教案

教案编制说明

一、使用教材：

《可视化编程应用——VisualBasic》,贾长云，高教出版社。

二、主要参考书目：

《VisualBasic程序设计教程6.0》,龚沛曾，高教出版社。

《VisualBasic程序设计基础》,段云田，高教出版社，等。

三、教学环境要求：

微机教室；多媒体教师机一台，已安装VB6.0、“速软”或其它教学用软件；学

生每人一台微机。

四、授课班级、每班授课周学时：

大02微机1班，中03微机1班（中专班内容略减）。周学时4。

五、教学方法：

针对不同的内容分别采用不同的教学方法。如：基础理论部分采用讲授法，编程

技术部分采用导学法、研究法、实例分析法等。

六、关于教学实例程序

教案中所列教学实例的程序代码，全部上机通过，且有些代码比教材中的还要简

洁，是我多年从事程序设计教学经验的结晶。

由于水平有限，恳请读者指正。