《Visual Basic程序设计与实训教程》第5章数组.pptVIP

第5章 数 组 【目的要求】 1、掌握数组的概念和一维数组、二维数组定义方法； 2、熟练使用数组进行程序设计； 3、掌握控件数组的建立方法和编程技巧； 3、了解动态数组的创建方法及简单应用方法； 【重点】 1. 一维数组的应用 2. 控件数组的定义与应用 【难点】 控件数组的应用 5.1 数组的概念 在VB中，把一组具有同一名字、不同下标的下标变量称为数组。 在Visual Basic中，使用数组变量时需注意以下几点： (1) 数组名的命名与简单变量的命名规则相同。 (2) 下标必须用括号括起来，不能把数组元素S(1)写成S1，后者是简单变量。 (3) 下标可以是常数、变量或表达式。 (4) 下标必须是整数。 (5) 下标的最大值和最小值分别称为数组的上界和下界。数组元素在上、下界内是连续的。 声明一个数组变量时，必须给定一个数组使用的有效范围： (1) 局部数组：在模块中用Private语句来声明数组。 (2) 模块数组：在模块中用Private语句来声明数组。 (3) 全局数组：在模块中用Public语句来声明数组。 根据在程序运行过程中是否可以改变数组大小，数组又可以分成两类。一类是固定数组，该数组的大小始终保持不变；另一类是动态数组，该数组的大小在程序运行过程中可以改变。 5.2 一维数组 5.2.1一维数组的定义 在声明数组时，Visual Basic提供了两种格式： 格式1： Dim 数组名(下标上界) [As 类型] ‘隐式声明 格式2： Dim 数组名([下界 To] 上界) [As 类型] 说明 （1）在同一过程中，数组名不能与变量名相同； （2）数组的下界必须小于上界； （3）当用Dim语句定义数组时，该语句把数值数组中的全部数组元素全部初始化为0，字符串数组的全部数组元素全部初始化为空串； 例： Dim Sum(10) As Long ‘下标从0～10，共11个元素 Dim A(1 to 9) As Integer ‘下标从1～9，共9个元素 Dim A%（5），B！（3 To 5），C#（12） 5.2.2一维数组的引用 1、应用格式：数组名（下标） (1) 下标可以是常数、变量或表达式。 (2) 下标必须是整数。且必须在指定的范围之内。 数组元素的赋值等同普通变量。 用Array函数对一维数组进行初始化 格式：数组变量名=Array(数组元素值表) 注意：只能对一维Variant数组（且不指定上下界）赋初值。 2、一维数组的基本操作 用单循环对一维数组进行操作； For m＝0 to 10 A（m）＝inputbox（”请输入数据”） Next 直接将一个数组的值赋值给另一个数组 例如： Dim A(3) As Integer, B() As integer A(0)=2: A(1)=4: A(2)=-6: A(3)=8 : B=A 注意： (1) 赋值号两边的数据类型必须一致。 (2) 赋值号左边的是一个动态数组。如果赋值号左边的是一个大小固定的数组，则数组赋值时将出错。 5.2.3 一维数组应用 For i = 0 To 3 Print b(1)(i) Next 流程图及界面设计如下图： 窗体的“（通用）（声明）”中的代码为： Option Base 1 Dim a(10) As Integer “输入”按钮的代码为： Private Sub cmdInput_Click() a(1) = InputBox(请输入第1个数据：, 排序数据) Text1.text=a(1) For i = 2 To 10 a(i) = InputBox(请输入第 Str(i) 个数据：, 排序数据) Text1.Text = Text1.Text , a(i) Next End Sub “排序”按钮的代码为： Private Sub cmdSort_Click() For i = 1 To 9 For j = i + 1 To 10 If a(i) a(j) Then t = a(i): a(i) = a(j): a(j) = t End If Next Next p = Str(a(1)) For i = 2 To 10 p = p , a(i) Next Text2.Text = LTrim(p) End Sub 5.3