[理学]第4章 VB程序设计语句.pptVIP

4.4.6 数组的基本操作 数组的基本操作包括输入、输出及复制，这些操作都是对数组元素进行的。 1.给数组元素赋初值 (1)利用For循环语句 Dim A(5) As Integer For I=1 To 5 A(I)=0 数组的每个元素值为0 Next (2)利用Array函数 在VB中可以使用Array函数为数组元素赋值，即把一个数据集赋值给某个数组。 利用Array函数 格式：〈数组变量名〉=Array(数组元素值) 功能：将数组元素值赋给数组各元素的值，各值之间用逗号分隔。 说明：数组变量名是预先定义的数组名(定义时没有指定维数和上下界，并且类型必须为变量类型Variant)，在数组变量名之后没有括号。 【例4.24】 用Array函数给数组赋值。 说明： 利用Array函数对数组各元素赋值，定义数组时圆括号可以省略，其类型只能是Variant。 数组的下界为零，上界由Array函数括号内的参数个数决定，也可通过函数UBound获得。 4.4.6 数组的基本操作 2.数组的输入 数组的输入可以用For循环语句及文本框控件输入，也可以通过InputBox函数输入。 (1)InputBox函数给数组赋值 【例4.25】 用InputBox函数给数组赋值。 (2)用赋值语句给数组赋值 3.数组元素的输出 多维数组元素的输出和输入都可以通过多重循环来实现。由于VB中的数组是按行存储的，因此把控制数组第一维的循环变量放在最外层循环中。 【例4.26】 二维数组的输入与输出。 4.4.6 数组的基本操作 4.数组元素的复制 【例4.27】把数组N中的数据复制到数组M中。 4.4.7 数组应用举例 【例4.28】用数组输入5个整数，按逆序排列。 【例4.29】用数组输入5个整数，找出最大的数。 【例4.30】求数组中最大元素值和所在的下标及各元素之和。 【例4.31】输入一个字符串，统计各字母出现的次数，字母不区分大小写。程序的运行结果分析： 统计26个字母出现的个数，要定义一个具有26个元素的数组，每个元素的下标表示对应的字母，元素的值表示对应字母出现的次数。 从输入的字符串中逐一取出字符，转换成大写字符(使得大小写不区分)，进行判断。 【例4.32】用选择法将数组排序。对于已知存放在数组中的n个数，用选择法按递增顺序排列。 【例4.33】用冒泡排序法将数组排序。对于已知存放在数组中的n个数，用冒泡法按递增顺序排序。 4.5 控件数组 前面我们介绍了数值数组和字符数组。在VB中，还提供了控件数组，它为处理一组功能相近的控件提供有力的方法。 4.5.1 控件数组的概念 控件数组是由一组相同类型的控件组成。它们共用一个控件名，即Name属性值相同，也就是数组名具有相同的属性，但通常具有不同的属性值。当建立控件数组时，系统给每个元素赋予一个惟一的索引号(Index),即下标，下标值由Index属性指定。通过属性窗口的Index属性，可以知道该控件的下标是多少，第1个元素下标是0，第2个元素下标是1，以此类推。控件数组共享同样的事件过程。例如，控件数组Command有3个命令按钮，不论单击哪个命令按钮，都会调用同一个事件过程。 4.5.1 控件数组的概念 为了区分控件数组中的各个元素，VB会把下标值传送给一个过程。例如，单击上述控件数组中的任意一个命令按钮时，调用的事件过程如下： Private Sub Command_Click(Index As Integer) … End Sub 4.5.2 控件数组的建立 控件数组是针对控件建立的，因此与普通数组的定义方法不一样，可以通过以下三种方法来建立控件数组。 1.在设计时建立控件数组 方法一： (1)在窗体上画出作为数组元素的各个控件。 (2)单击要包含到数组中的某个控件，将其激活。 (3)在属性窗口中，选择Name属性，并输入控件的名称。当对第二个控件输入与第一个控件相同的名称后，VB将显示一个对话框，如图4.11所示，询问是否确实要建立控件数组。单击“是”按钮，将建立控件数组，单击“否”按钮，则放弃建立操作。 4.5.1 控件数组的建立 方法二： (1)在窗体上画出一个控件，将其激活。 (2)执行“编辑”菜单中的“复制”命令(或者按Ctrl+C命令)，将该控件放入剪贴板中。 (3)执行“编辑”菜单中的“粘贴”命令(或者按Ctrl+V命令)，将显示一个对话框，询问是否建立控件数组，如图4.11所示。 (4)单击对话框中的“是”按钮，窗体的左上角将出现一个控件，它就是控件数组的第二个元素。 (5)重复执行“编辑”菜单中的“粘贴”命令(或者按Ctrl+V命令)，可以建立控件数组的其他元素。