[所有分类]72学时VB.pptVIP

数组 引例： 5.1数组的概念 基本概念： [注意]： 数组定义 静态数组 [例题]： 2．多维数组 注意事项： 数组的结构 一维数组的存储方式 二维数组的存储方式 练习 数组的基本操作 [例题]： 3、利用InputBox 函数给数组赋值 2、数组元素输出 3、数组元素的引用 例：编写一个数组，随机产生12个两位数，存放在数组com中，并从中找出一个最大数和一个最小数。 练习：求二维数组中最大元素 5．3 动态数组 注意： 例题： [例题]： 5．4 控件数组 建立的方法：1、创建同名控件。2、复制现存控件。 Dim compare(12) As Integer, i As Integer Dim max As Integer, min As Integer Randomize For i = 1 To 12 compare(i) = Int(90 * Rnd) + 10 Print compare(i); Next i Print max = compare(1): min = compare(1) For i = 1 To 12 If compare(i) max Then max = compare(i) ElseIf compare(i) min Then min = compare(i) End If Next Print 最大数是：; max Print 最小数是：; min Max = a(1, 1) For i = 1 To 5 For j = 1 To 5 If a(i, j) Max Then Max = a(i, j) End If Next j Next i Print Max 动态数组指在声明数组时未给出数组的大小（省略括号中的下标），当要使用该数组时，随时可用ReDim语句重新定义数组的大小。使用动态数组的优点是：用户可以根据需要有效地利用存储空间，它是在程序执行到ReDim 语句时分配存储空间。 格式：Redim [preserve ] 数组名 ( 下标1 [，下标2 …]) 功能：声明动态数组的大小。 （1）在动态数组ReDim 语句中的下标可以是常量，也可以是有了确定值的变量； （2）在过程中可以多次使用ReDim 来改变数组的大小，也可改变数组的维数。 （3）每次使用ReDim 语句都会使原来数组中的值丢失，可以在ReDim 语句后加Preserve参数来保留数组中的数据，但使用Preserve只能改变最后一维的大小，前面几维大小不能改变。 Dim a( ) as IntegerN=4redim a(n) N=9redim a(n)n=10redim a(n,n) Dim att( ) as IntegerI=2: J=2redim att(I, j) j=j+1redim preserve att(I , j) Option Base 1 Dim a() As Integer Dim n As Integer Private Sub Command1_Click() n = n + 1 ReDim Preserve a(n) a(n) = Val(Text1.Text) Combo1.AddItem a(n) Text1.Text = Text2.Text = n End Sub * * 求100个学生的平均成绩 　　如果用一般变量来表示成绩，需要用100个变量，如：mark1、mark2、……mark100。但是如果我们引入数组这个概念，那么就可以只用一个来表示。 数组是一组具有相同类型的有序变量的集合。这些变量按照一定的规则排列，使用一片连续的存储单元。数组可用于存储成组的有序数据。使用数组就是用一个相同的名字引用这以组变量中的数据，这个名字称为数组名。 数组：是同类型变量的一个有序的集合。 [例如]：A（1 To 100），表示一个包含100个数组元素的名为A的数组。 数组元素： 即数组中的单个变量。用下标表示数组中的各个元素。 表示方法：数组名（P1，[P2，……]） 数组维数： 由数组元素中下标的个数决定，一个下标表示一维数组，二个下标表示二维数组。VB中有一维数组、二维数组、……最多60维数组。 1、 P1、P2是下标 a、下标表示顺序号，每个数组元素有一个唯一的顺序号，用于决定它在数组中的位置，下