《Visual Basic程序设计教程 华东交通大学教材 专著 基金资助项目 教学课件 熊李艳 周美玲 第六章数组》.pdf

第六章 数组 6.1 数组的概念 【例6-1】若要计算一个班100个同学的英语 课程的平均分，然后分别统计出比平均分高、 比平均分低的人数。 Dim mark As Integer, aver As Single aver = 0 For i = 1 To 100 用变量和循 mark = Int(Rnd * 101) 环来实现 aver = aver + mark Next i aver = aver / 100 1 Private Sub Form_Click() Dim mark(1 To 100) As Integer Dim aver!, i%, m%, n% aver = 0 用数组来实 For i = 1 To 100 现 mark(i) = Int(Rnd * 101) aver = aver + mark(i) Next i aver = aver / 100 m = 0 n = 0 For i = 1 To 100 If mark(i) aver Then m = m + 1 If mark(i) aver Then n = n + 1 Next i Print 100个同学的平均分是：; aver Print 比平均分高的学生有; m; 个 Print 比平均分低的学生有; n; 个 2 End Sub 温 馨 提 示 本文档为 PDF 格式课件，不能运用教学演示， 需要 PPT 格式的课件 ，请 访问 尚辅网 ： 更多课件等您拿。 快速获得课件方法：在淘宝店铺查找输入： 教 学配套课件中心 ；或是直接输入地址 ： 惊喜超出您的想象！ 直接联系获取课件QQ: 349134187 旺旺：源汇雅馨 扫一扫绝对免费获得课件：订阅尚辅网微信公众 号 一扫课件到手！！！！！！ 数组并不是一种数据类型，而是一组相 同类型的变量的集合。 数组必须先声明后使用。 两类数组: 静态(定长)数组、动态(可变长)数组 6.2 静态数组及声明 形式: Dim 数组名(下标1[,下标2…])[As 类型] 声明了数组的名、维数、大小、类型 3 维数：几个下标为几维数组 下标的形式:[下界 To上界],省略下界默认 为0,必须为常数 每一维大小: 上界－下界+1 数组大小: 每一维大小的乘积 As类型：省略则为变体数组，可包含不同类 型的数据，否则各数组元素类型必 须一致。 4