会计考友 发表于 2012-7-31 22:10:12

2011年计算机等级考试二级VB基础教程(23)

  5.6自定义数据类型
  1. 自定义数据类型的定义
  是指由若干标准数据类型组成的一种复合类型,也称为记录类型。
  (1)定义方式:
  Type 自定义类型名
  元素名[(下标)] As 类型名
  ……
  元素名[(下标)] As 类型名
  End Type
  元素名:表示自定义类型中的一个成员
  下标(可选):表示是数组
  类型名:为标准类型
  例:定义一个学生信息的自定义类型:
  Type studtype
  No As Integer ’ 定义学号
  Name As String*10 ’ 定义姓名
  Sex As String*2 ’ 定义性别
  Mark(1 TO 4) As Single ’ 定义4门课程的成绩
  Total As Single ’ 定义总分
  End Type
  (2)注意事项
  1)自定义类型一般在标准模块(.bas)中定义,默认是Public
  2)自定义类型中的元素可以是字符串,但应是定长字符串
  3) 不可把自定义类型名与该类型的变量名混淆
  4) 注意自定义类型变量与数组的差别:它们都由若干元素组成,前者的元素代表不同性质、不同类型的数据,以元素名表示不同的元素;后者存放的是同种性质、同种类型的数据,以下标表示不同元素。
  2. 自定义型变量的声明和使用
  使用形式: Dim 变量名 As 自定义类型名
  例如: Dim student As studtype, mystud As studtype
  自定义类型中元素的表示方法是:变量名 . 元素名 如:student.name student.mark(4)
  为了简单起见,可以用With …… End With 语句进行简化。 例:
  With student
  .no=99001
  .name=""
  .sex=""
  .total=0
  for I=1 to 4
  .mark(I)=int(rnd*101) ’随机产生0 - 100之间的分数
  .total=.total+.may(I)
  next I
  End With
  Mystud=student ’ 同种自定义类型变量可以直接赋值
  3.自定义类型数组的使用
  自定义类型数组就是数组中的每个元素都是自定义类型。
  例如:自定义一个由学生姓名、成绩组成的学生记录类型,用来存放100个学生的记录。
页: [1]
查看完整版本: 2011年计算机等级考试二级VB基础教程(23)