VB数据类型(二)

记录类型

说明

用户自定义的数据类型。主要通过Type语句来实现

[Public| Private] Type 数据类型名
		数据类型元素名 AS 类型名
		数据类型元素 AS 类型名
		...
End Type

”数据类型名“是要定义的数据类型的名称，”数据类型元素名“ 不能是数组名，”类型名“可以是任何基本数据类型，也可以是用户定义的类型

注意事项

1. Type语句只能在模块中使用
2. 在标准模块中，记录类型默认为公用的，可以使用Private改变其可见性，而在类模块中，记录类型只能是私有的，且使用Public关键字也不能改变其可见性。
3. 在Type…End Type 语句块中不允许使用行号和行标签
4. 用户自定义类型常用来表示数据记录，数据记录一般由多个不同数据类型的元素组成

案例

使用Type语句声明一个新的数据类型MPeople，然后为该类型中的各个元素赋值，最后输出

Type Motor
	name AS String * 20
	age as Integer
End Type
'在窗体的Form_Load事件过程中添加一个模块，声明Poeple类型的Mypeople，
'然后为各个元素赋值，最后输出
Private Sub Form_Load()
	Dim MyPeople as People
	MyPeople.name = "张三"
	MyPeople.age = 25
	Msgbox "姓名：" & MyPeople.name &
				"年龄：" & Mypeople.age 

枚举类型

说明

为一组整数值提供便于记忆的标识符，其作用是管理和使用常量，主要通过Enum语句来定义

[Private|Public] Enum 数据类型名
数据类型元素名 = 整型常数表达式
数据类型元素名 = 整型常数表达式
...
End Enum

案例

使用Enum定义颜色含义

Public Enum MyColor
	MyRed = 1
	MyGreen = 2
	MyBlue = 3
	MyYellow = 4
End Enum