vb设计知识解读.ppt

第四讲　VB高级语言技巧 信息管理系 刘世峰 博士 [内容简介] 本章以一个多功能计算器应用程序为实例 对第3章所开发的简单计算器进行功能扩展 在基础上，较系统介绍数组、过程、函数的定义和使用方法 详细讲解了鼠标和键盘的常用使用技巧。 通过本章的学习，你将初步具备利用VB编程各类高级应用程序的能力。 [学习目标] 1．掌握数组的使用方法 2．掌握键盘、鼠标的使用技巧 3．掌握过程和函数的定义和调用方法 4．掌握API函数的调用方法 5．了解枚举及自定义数据类型 6．了解“多功能计算器”程序设计过程 4.1“多功能计算器”程序任务 目的：对上一讲的“计算器”程序进行扩展和完善 4.1.1 任务概述 能否利用第3章所学知识，对这个程序进行一些功能扩展，比如将计算结果转换成十六进制呢？ 文本框主要是用于显示信息的，那么能否禁止用户通过键盘在其中输入数据呢？ 能否使计算器窗体总是悬浮在其他窗体之上，以便于使用呢？ 在编写数字区按钮事件代码时，工作量过于重复。10个按钮要编写10个Click事件处理程序，如果有100个这样的按钮，是不是意味着我们要编写100个这样的程序呢？仔细分析这些代码，会发现它们基本相同，那么能否采用合并同类项的方法，以减少代码设计的工作量呢？ 本讲任务将针对上述问题，利用数组、键盘控件、自定义函数等方法，对简单计算器程序进行功能扩充，运行结果如图所示 4.1.2 界面设计 新知识：控件数组 4.1.3 代码设计 1．用API函数实现“总在前面”效果 2．数字区的命令按钮的Click事件 与普通Click事件的区别 3．禁止用户在文本框中输入数字 三种方法可实现这种功能 一是将文本框的Enabled属性设置为False； 二是将文本框的Locked属性设置为True； 三是通过代码控制键盘事件 4．修改“计算结果”按钮的Click事件代码 5．编写ChangeMe函数代码 4.2数组的使用 4.2.1数组 1．数组的概念 在实际编程时，经常会对一批具有相同属性的数据整体进行处理，这时就会用到数组类型了。 VB中把一组具有同一名字，不同下标的变量称为数组，它实际上是一组相同类型的变量的集合。 根据下标的个数可分为一维数组、二维数组、多维数组。 2．声明静态数组 方法1：Dim 数组名(上界) As数据类型 Dim A(5) As Integer Dim B(5,5) As Integer 方法2：Dim 数组名(下界 To 上界) Dim A(1 To 5) As Integer Dim B(1 To 5,1 To 5) As Integer 3．动态数组 如果不能事先确定数组元素的个数，我们就可以采用动态数组声明技术 主要方法 （1）首先声明一个静态数组。可以只定义数组名，不指定数组的大小。比如： 　　　　　　Dim A() As Integer （2）在程序执行过程中，使用ReDim语句修改数组的大小或数组的上下界，比如： 　　　　　ReDim A(20) As Integer　或 　　　ReDim A(1 To 20) As Integer 4.2.2控件数组 即所有元素的Name属性均相同 各控件元素用Index属性表示数组下标 请思考：为什么要使用控件数组？ 4.2.3枚举及自定义数据类型 Public Enum enmDay 星期日 = 1 星期一 = 2 星期二 = 3 星期三 = 4 星期四 = 5 星期五 = 6 星期六 = 7 End Enum 声明一个变量Myday，其类型为enmDay Dim Myday As enmDay 为变量赋值，相当于Myday=1 Myday = 星期日 Public Type Student 学号 As String*10 姓名 As String*10 年龄 As Integer 籍贯 As String End Type （1）声明变量 Dim x As Student （2）使用 x.学号 = 2004001 x.姓名 = 张红 枚举和自定义类型是一种有效的数据组织方式，尽管不使用它们也照样可以开发出功能强大的应用程序，但有效地运用这两种方式，可以使程序代码更清晰，简洁。如果要使用这两种方式，最好能在模块中使用Public定义，以便整个应用程序使用。 4.3过程和函数的定义和调用 Sub…End Sub定义的子程序称为Sub过程（子过程） 将Function…End Function定义的函数称为Function过程（函数过程） 4.3.1为什么要编写自定义过程 　　　　　请思考？？？ 　　　 　不编写自定义过程，难道就不