第十章用户定义类型与枚举类型.ppt

测绘程序设计 * 第十章 用户定义类型与枚举类型 一、用户定义类型 二、枚举类型 三、滚动条控件 四、图像控件、图片框控件 * 一、用户定义类型 1、建立用户定义类型 Public|Private:可选的。用于声明可在工程的所有模块的任何过程中使用的用户定义类型|只能在包含该声明的模块中使用的用户自定义的类型。 用户类型名:必需的。用户自定义类型的名称。 字段名:必需的。用户自定义类型的元素名称。 数据类型名:必需的。元素的数据类型；可以是任何基本数据类型、其它的用户自定义的类型或对象类型。 [Private | Public] Type 用户类型名 字段名1 As 数据类型名 [字段名2 As 数据类型名] . . . [字段名n As 数据类型名] End Type 遵循标准的变量命名约定 注:只能是定长的字符串 第十章 用户定义类型与枚举类型 注:不能为数组 * 一、用户定义类型 1、建立用户定义类型 Type 语句只能在模块级使用。使用 Type 语句声明了一个用户自定义类型后，就可以在该声明范围内的任何位置声明该类型的变量。 在标准模块中，用户自定义类型按缺省设置是公用的。可以使用Private关键字来改变其可见性。而在类模块中，用户自定义类型只能是私有的，且使用Public 关键字也不能改变其可见性。 在 Type...End Type 块中不允许使用行号和行标签(标号)。 用户自定义类型经常用来表示数据记录，记录一般由多个不同数据类型的元素组成。 第十章 用户定义类型与枚举类型 * 一、用户定义类型 1、建立用户定义类型 Type st xh as string*7 ‘学号 xm as string* 8 ‘姓名 xb as string* 2 ‘性别 pjf as single ‘平均成绩 End Type 第十章 用户定义类型与枚举类型 * 一、用户定义类型 2、建立和使用用户定义类型的变量 建立用户定义类型的变量 可以使用 Dim、Private、Public、ReDim 或 Static 来声明用户自定义类型的变量。 对同一种用户定义类型，可以声明为局部的、私有的或公用的模块级变量，定义格式： 第十章 用户定义类型与枚举类型 Dim变量名 As 用户定义类型名 Dim 数组名(维数及下标范围) As 用户定义类型名 Dim stu1 As st Dim stud(1 To 10) As st * 一、用户定义类型 2、建立和使用用户定义类型的变量 建立用户定义类型的变量 假如声明使用Dim关键字，标准模块中的用户自定义类型将缺省为公有的。假如希望自定义类型为私有的，确保用Private关键字将其声明为私有。 第十章 用户定义类型与枚举类型 过程/模块 创建用户定义类型 声明用户定义类型的变量 过程 不适用 仅局部(Dim) 标准模块 私有(Private)或公用(Public) 私有(Private)或公用(Public) 窗体模块 仅私有 仅私有 * 一、用户定义类型 2、建立和使用用户定义类型的变量 使用用户定义类型变量 引用用户定义类型变量中字段的格式: 第十章 用户定义类型与枚举类型 用户定义类型变量名.字段名 * 一、用户定义类型 第十章 用户定义类型与枚举类型 例10-2 利用用户定义类型变量对各项赋值 Private Type Studentrec Stunum As String * 10 Names As String * 8 Sex As String * 2 Avg As Single End Type Private Sub Command1_Click() Dim Stu As Studentrec Stu.Stunum = Stu.Names = 王 平 Stu.Sex = 女 Stu.Avg = 88 Text1(0).Text = Stu.Stunum Text1(1).Text = Stu.Names Text1(2).Text = Stu.Sex Text1(3).Text = Stu.Avg End Sub 例 10-2 * 一、用户定义类型 2、建立和使用用户定义类型的变量 用户定义类型数组 用户定义数据类型常称为记录类型，用户定义数据类型的变量称为记录变量，数组则