第17讲 VB课件new.pptVIP

举例 1、 p173 例7.6 2、 p174 例7.7 注意： ⑴自定义数据类型一般在标准模块(.bas)中定义，默认是Public型若在窗体模块中定义，则必须是Private型。 ⑵自定义数据类型中的元素类型可以是字符串，但必须是定长字符串； ⑶自定义数据类型的元素可以是不同类型的数据。 * 一、控件数组 1 控件数组的概念 一组相同类型的控件组成。 它们共用一个控件名，具有相同的属性，建立时系统给每个元素赋一个唯一的索引号(Index)。 控件数组共享一个事件过程，通过返回的下标值区分控件数组中的各个元素。 例： Private Sub cmdName _Click(Index As Integer) … If Index=3 then ‘ 处理第四个命令按钮的操作 End If … End Sub 控件数组的建立 一、在设计时建立控件数组的步骤： 1．窗体上画出控件，进行属性设置，这是建立的第一个元素； 2．选中该控件，进行“Copy”操作若干次和“Paste”操作若干次建立所需个数的控件数组元素。 3．进行事件过程的编程。? 二、运行时添加控件数组的步骤: 1．在窗体上画出某控件，设置该控件的Index值为0，表示该控件为数组,这是建立的第一个元素，并可对一些取值相同的属性进行设置，如文本框的字体。 2．在编程时通过Load方法添加其余的若干个元素，也可以通过Unload方法删除某个添加的元素。 Load方法和Unload方法的使用格式： Load 控件数组名(表达式) Unload 控件数组名(表达式) 其中，表达式为整型数据。表示控件数组的某个元素。 3．通过Left和Top属性确定新添加的控件数组元素在窗体的位置，并将Visible 属性设置为True。 二、自定义数据类型 自定义数据类型也称为记录类型，由若干个标准数据类型构成，通过Type语句实现。 形式如下： Type 自定义类型名称 元素名1[(下标)] As 类型名称 元素名2[(下标)] As 类型名称 … 元素名n[(下标)] As 类型名称 End Type 其中： 元素名：自定义数据类型中的一个成员； 下标：表示是数组 ； 类型名称：为标准类型； 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 2 自定义类型变量的声明和使用 （1）、自定义类型变量的声明 一旦定义好了类型，就可以在变量的声明时使用该变量。 形式： Dim 变量名 As 自定义类型 例如，有了上述定义的数据类型StdType，则可以说明如下变量： Dim Student As StdType，Mystd As StdType （2）、自定义类型变量的使用 要使用自定义类型变量中的某个元素，形式如下： 变量名.元素名 如：Student.No ‘表示Student变量中的学号 Student.Name ‘表示Student