第18讲习题课 VB课件new.pptVIP

数组习题讲解 三、For Each…Next 语句 For Each…Next 语句类似与For …Next 语句，但前者专门针对一个数组或集合中的每个元素执行重复语句。一般格式为： * * 一、数组的基本操作 1. 可通过循环给数组元素的初值 For i = 1 To 10 A数组的每个元素值为1 A(i)=1 Next i 2. 数组的输入 For i = 1 To 4 For j = 1 To 5 sc(i, j) = InputBox(输入sc的值) Next j Next I 3. 数组的输出 输出如下图所示的下三角数据 Dim sc(5,5) As Integer,i%,j% For i = 1 To 5 For j = 1 To i sc(i, j) = i * 5 + j Print sc(i, j); ; Next j Print 换行 Next I 二、 求数组中最大元素 Dim Max As Integer Max=A(1) Fo