CH5 数组与自定义类型.pptVIP

第五章 数组和自定义类型 主讲：王晴;本章内容 ;5.1 数组 ——5.1.1数组的概念 ; Dim mark(99) As Integer 声明数组mark Dim aver!, overn%, i% aver = 0 For i = 0 To 99 输入成绩，求分数和 mark(i) = InputBox(输入学生的成绩) aver = aver + mark(i) Next i aver = aver / 100 求100人的平均分 overn = 0 For i = 0 To 99 统计高于平均分的人数 If mark(i) aver Then overn = overn + 1 Next i MsgBox (平均分: aver 高于平均分人数: overn) ;数组: 不是一种数据类型，而是一组相同类型的变量的集合。 作用：用一个数组名代表逻辑上相关的一批数据，用下标表示该数组中的各个元素，和循环语句结合使用，使得程序书写简洁。 使用：必须先声明后使用;5.1数组 ——5.1.2定长数组及声明;例：Dim mark(99) As Integer ◇声明了一维定长整型数组，数组名为mark ， ◇共有100个元素，下标范围为0 To 99； ◇ mark数组的各元素是mark(0)，mark(1)，…，mark(99)； ◇mark(i)表示由下标i的值决定是哪一个元素。mark数组内存分配如下：;x(1,4);5.1数组 ——5.1.2定长数组及声明;Option Base语句 功能：在模块级别中使用，用来声明数组下标的缺省下界。 语法格式： Option Base {0|1} 缺省状态下数组的下界为0，此时无需使用Option Base 语句。如果使用该语句规定数组下界为1，则必须在模块的数组声明之前使用Option Base 语句。 对于那些使用to来设定维数的数组而言，它们可以用任何整数作为下标而不受option base 语句的限制。;LBound函数和UBound函数 功能： LBound函数和Ubound函数都是返回一个Long型数据，前者得到的值为指定数组维可用的最小下标，而后者得到的是最大下标。 语法格式：Lbound （数组名[，指定的维数]） Ubound （数组名[，指定的维数]） 。 举例：dim A(1 to 100, 3, -3 to 4) as integer;5.2 数组的基本操作;数组的输出 例5.3 形成5×5的方阵，分别输出方阵中各元素、上三角和下三角元素 方阵元素值规律：第一行的元素为0～4，以后每一行是前一行对应元素增加5。 上三角规律：每一行的起始列与行号相同,只要控制内循环的初值。 下三角规律：每一行的终止列与行号相同，只要控制内循环的终值。 用Tab函数或Space定位控制输出的空格。;例5.3 形成5×5的方阵，分别输出方阵中各元素、上三角和下三角元素 代码：;5.3 列表框和组合框 ;List属性：用来访问列表框和组合框中的所有列表项，以字符串数组的方式存在。可在属性窗口设置，也可在代码窗口设置。 在列表中，每一项都是List属性的一个元素。通过该属性，可以实现对列表框中每一列表项进行单独操作。列表框中第一个列表项的数组下标索引值为0，最后一个列表项的数组下标索引值为ListCount-1。;5.3 列表框和组合框 ——列表框和组合框的重要属性;ListCount属性： 用于返回列表框或组合框中当前项目的总数。只读属性，只能在代码窗口引用。 ListCount属性的值总是等于列表中最后一个列表项的ListIndex的属性值加1。 Eg： ;Sorted属性：指定列表框或组合框中的项是否按字母顺序进行排列。为运行时只读属性，即只能在属性窗口设置，不能在代码中设置，值为True或False。 值为True时，表示按字母顺序对列表中的项进行排序，排序时更改列表项的下标索引值； 值为False时，表示不对列表项进行排序。;Text属性：可用于列表框和组合框。用于直接返回当前选中项目的文本。 该属性是一个只读属性，不能在设计时通过属性窗口设置，也不允许在程序运行时通过代码设置，它只用于获取当前选定的项目值。 等价关系：List1.text 与 list1.List