第4章复合数据类型.pptVIP

第4章 数 组 本章要点： ? 数组的概念 ? 一维数组的定义、赋初值与数组元素的引用 ? 二维数组的定义、赋初值与数组元素的引用 ? 改变数组尺寸的方法 ? For Each语句、LBound函数及UBound函数的使用 ? 枚举 ? 集合 4.1 理论介绍 (问题提出) 4.1.1 数组的概念:指一组相同类型的变量 4.1.2 一维数组的定义与使用 1．一维数组的定义与分配 [格式]：Declare 数组名(下标上限) As 数据类型符 例如，有下列语句： Dim a(9) As Integer; ‘定义了一个数组a，该数组的数据类 ‘型是integer，具有10个元素。第一个元素为a(0) ， ‘最后一个元素为a(9) 2．定义数组时对数组元素进行初始化 [格式]：Declare 数组名() As 数据类型符 ={初值列表} 例如，有下列语句： Dim Month() As Short = {1, 2, 3, 4} 3．数组元素的引用 引用一维数组元素的一般形式如下： 数组名（下标） 例如：Dim b(2+7) as integer ‘不允许，出错 练习 定义一个数组a，存放了数据：5,3,2,1,8,67,45,21,86,433,65.你写个程序来求出它的最大值，最小值，并算出平均值。 将Fibonacci数列的前十项存入一个数组。 (提示:1,1,2,3,5,8….) 4.1.3 多维数组的定义、分配与使用 1．二维数组的定义 [格式]：Declare 数组名(下标1上限,下标2上限) As 数据类型符 [解释]：括号中的“，”表示该数组是二维的，如果两边的数字不写的话，表示不确定长度。 2．二维数组的赋初值 [格式]：Dim 数组名(,) As 数据类型符= {{初值列表1},{初值列表2},…,{初值列表n}} 3．引用二维数组元素引用 数组名（下标1,下标2） 【例4-3】 某班有5名同学，本学期开了3门课，期末考试后，要统计每门课程的平均分。请你编写一个程序实现该功能。 练习与作业　 写九九表，将其存放在一个两维数组。 4.1.4 改变数组大小 [格式]：ReDim 数组名(下标1上限[,下标2上限…]) 例如，有下列语句： Dim Arr(10) As Integer …… ReDim Arr(15) 4.1.5 For Each语句 [格式]：For Each 变量名 in 数组或对象集合 循环体 Next 变量名 【例4-4】 使用For Each语句输出一维数组中大于0的数。 练习 使用For Each求数组的元素最大,最小与平均值。 4.1.6 LBound()函数和UBound()函数 1．求数组某维下界函数——LBound函数 [格式]：LBound(数组名[,维数]) 2．求数组某维上界函数——UBound函数 [格式]：UBound(数组名[,维数]) 4.2 练习 使用上述两函数改写第六、七页的程序。并考虑，如何改动才高效。 4.3 上机练习重应用 4.3.1 上机练习一：一维数组的反序存放 编一个程序，生成一个长度为十的数组，并将里面的数据按反序存放在另一个数组后输出。例： 1、2、3、4、5、6、7、8、9、10 10、9、8、7、6、5、4、3、2、1 4.4枚举 当一个变量只有几种可能的值时，可以定义为枚举类型。所谓“枚举”，是指将变量的值逐一列举出来，变量的值只限于列举出来的值的范围。例如：周、月。 例子 Public Enum Days Sunday Monday Tuesday Wednesday Thursday Friday Saturday End Enum 输出:Console.WriteLine(Days.Monday) 注意 枚举的第一个常数被初始化为0,其中有常数被赋值为a,而下一个数没有被赋值的话就默认为a+1. Sunday Monday Tuesday Wednesday = 5 Thursday Friday Saturday 输出:Console.WriteLine(Days.Thursday) 答案为:6 小结 本章主要讲述了数组和枚举等的复合数据类型。 * * Dim a1(4) As Integer a1(0) = 0 : a1