VB程序设计_第七章_数组.pptVIP

Visual Basic 程序设计教程 7.5 自定义数据类型 7.5.1 自定义数据类型的定义 例如：一个有关学生信息的自定义数据类型 Type StdType ‘定义名为StdType的数据类型 No As Integer ‘学号 整型 Name As String *4 ‘姓名 字符型 定长为4个字符 Sex As String *1 ‘性别 字符型 定长为1个字符 Score (1 TO 4) As Single ‘成绩数组 单精度浮点数 Total As Single ‘总成绩 单精度浮点数 End Type 注意： ⑴自定义数据类型一般在标准模块(.bas)中定义，默认是Public型； 若在窗体模块中定义，则必须是Private。 ⑵自定义数据类型中的元素类型可以是字符串，但应是定长字符串； ⑶自定义数据类型和数组都是由若干个数据元素组成，但前者的元素 代表不同性质、不同类型的数据，以元素名表示不同的元素；而数 组存放的是同种性质、同种类型的数据，以下标表示不同的元素。 7.5 自定义数据类型 7.5.2 自定义类型变量的声明和使用 1、自定义类型变量的声明 一旦定义好了类型，就可以在变量的声明时使用该变量。 形式： Dim 变量名 As 自定义类型 例如，有了上述定义的数据类型StdType，则可以说明如下变量： Dim Student As StdType，Mystd As StdType 要表示自定义类型变量中的某个元素，形式如下： 变量名.元素名 如：Student.No ‘表示Student变量中的学号 Student.Name ‘表示Student变量中的姓名 Student.Score(2) ‘表示Student变量中的第2门成绩 也可利用With语句进行简化 7.5 自定义数据类型 7.5.2 自定义类型变量的声明和使用 2、With语句 With语句的功能就是简化对自定义类型变量中元素的访问方式； 格式： With 变量名 .元素名1=元素值1 .元素名2=元素值2 … .元素名n=元素值n End With 变量名.元素名1=元素值1 变量名.元素名2=元素值2 … 变量名.元素名n=元素值n 等价于 7.5 自定义数据类型 7.5.2 自定义类型变量的声明和使用 3、自定义类型变量的使用 With Student .No=2005 .Name=“吴仁迪” .Sex=“男” .Total=0 For i=1 to 4 .Score(i)=InputBox(“请输入”+.Name+”的第”+str(i)+”门课程成 绩”, ,0) .Total=.Total+Score(i) Next print .Name,.Total End With Mystd=Student ‘VB允许同种自定义类型变量直接赋值 7.5 自定义数据类型 7.5.3 自定义类型数组的应用 自定义类型数组就是数组中的每个元素都是相同的自定义类型。 如：Dim Std( 1 To 35) As StdType 定义了有35个元素的数组Std，该数组的每个元素又都是StdType类型。 例[7-8]利用自定义类型数组，编写模拟数据库记录输入、显示和查询的程序。自定义一个数据类型，由学号、姓名和三门课程成绩以及总分组成，声明一个存放40个学生记录的数组。 。。。 。。。 。。。 。。。 。。。 。。。