第3章复合数据类型.pptVIP

第3章 复合数据类型 3.1 3.2 3.3 3.4 3.5 3.6 3.7 3.8 枚举 数组 结构 集合 Array类 For Each语句 ArrayList类 综合应用 3.1 枚举 3.1.1 枚举类型的定义 枚举类型通过Enum语句来定义，语法如下： 语法： [Public | Private] Enum 类型名称 成员名 [ = 常数表达式] 成员名 [ = 常数表达式] …… End Enum 3.1.1 枚举类型的定义 Enum语句只能在模块、命名空间、文件级出现。也就是说可以在源文件中或者在模块、类或结构内部声明枚举，但不能在过程内部来声明。在定义了枚举类型后，就可以用它来声明变量类型、过程参数和函数返回值。在声明枚举的模块、类或结构内的任何位置都可以访问它们。 例如，用Enum语句定义中定义了一个枚举类型CourseCodes，其中使用赋值语句为一组课程命名常数 ： Public Enum CourseCodes Computer = 1 English = 2 Math = 3 Chemic = 4 End Enum 3.1.1 枚举类型的定义 例如，在下面的Enum语句定义中，没有用赋值语句为枚举的成员赋常数值，因此Sunday被初始化为0，Monday被初始化为1，Saturday被初始化为6 ： Public Enum Days Sunday Monday Tuesday Wednesday Thursday Friday Saturday End Enum 3.1.2枚举的使用 声明枚举类型后，就可以定义该枚举类型的变量，然后使用该变量存储枚举常数的值。若要引用枚举类型变量的成员，语法如下： 语法： 枚举类型变量名.成员名称 例如，利用前面例子中定义的一个枚举类型CourseCodes，定义一个该枚举类型的变量，然后访问它的Math常量 ： Dim MyCourse As CourseCodes MyCourse = CourseCodes.Math ‘MyCourse值为3 3.1.2枚举的使用 【例3.1】 定义一个枚举类型Days的变量MyDay，在窗体上画一个按钮，编写按钮的事件过程代码如下： Public Class Form1 Public Enum Days Sunday Monday Tuesday Wednesday Thursday Friday Saturday End Enum Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _ Handles Button1.Click Dim MyDay As Days MyDay = Days.Monday If MyDay Days.Saturday Then MsgBox(今天是工作日，不是周末, , ) End If End Sub End Class 3.1.2枚举的使用 程序运行启动，当单击按钮后界面如图3.1所示。 3.2 数组 3.2.1 数组声明 在使用数组前，必须声明数组。可以声明一维数组、二维数组，也可以定义多维数组。 语法： Dim 数组名(第一维下标上界[，第二维下标上界，…])[ As 数据类型 ] 说明： （1）“数组名”可以是任何合法的VB.NET变量名。 （2）“数组元素下标上界”的个数表示数组的维数，当只有一个时表示一维数组，最多可以声明32维数组。 （3）数组元素下标上界只能是常数，不能是变量或表达式，其最大值可为264-1。 （4）数组元素下标下界为0，不能改变。 （5） 数组的数据类型可以是基本的数据类型，也可以是Object类型。如果省略“As 数据类型”，则默认为Object类型。 例如： Dim A(14) As Integer 15 个元素，从A(0)到A(14) Dim B(5,3) As Decimal 24 个元素，从B(0,0)到B(5,3) Dim C(2+7) As String 出错 3.2.1 数组声明 1．LBound函数 对于已经定义的数组，可以用LBound 函数来获得数组任一维可用的最小下标，从而确定数组任一维的下界。 语法： LBound(数组名[, 维]) 例如， Dim A(9, 14) As