Visual Basic程序设计综合教程（田春婷）5911 第5章 数组.ppt

尚辅网 尚辅网 第5章 数组 在用计算机解决实际问题时，经常会遇到对批量数据进行处理的情况，如为了统计100个学生的成绩，按简单变量来处理会很不方便，由此引入了数组，极大的提高了此类问题的处理效率。本章以数组对批量数据的处理为例，介绍数组的概念及其应用、部分常用控件列表框和组合框，及直线和形状控件。 【主要内容】 ●掌握数组的基本概念及其使用 ●掌握控件listBox,ComBox的常用属性及其方法的使用 ●掌握控件Line,Shape的常用属性及基本应用。 5.1 引例 5.2 数组 5.3 控件数组 5.4 直线(Line)与形状(Shape) 5.5 列表框(ListBox)与组合框(ComboBox) 本章小结 【例5.1】设计一个用于对学生成绩排名的应用程序。程序运行界面如下图5.1（a）所示。 操作步骤： (1)设计用户界面 根据界面设计要求，创建如图5.1（b）所示用户界 面。将所需控件：两个标签（Label）,两个列表框 （Listbox）和一个命令按钮（command）分别放到适当位置，进行相应的属性设置。具体控件属性设置如下表5.1所示。 n个数a(1)—a(n),采用选择排序法的算法是： ① 先在n个数中选最小数，放在数组的第1个元素中，即：取第1个数，与后面n-1（即2与n）个数逐个比较。若第1个数大，则a(1)与参与比较的数组元素中的值进行互换，再将互换后的第1个数与剩下的数据比较，直到最后。 ② 再在第2至n个元素中，选最小数，放在第2个数组元素中。 取第2个数，与后面n-2（即3到n）个数逐个比较。若第2个数大，则互换，直到最后。 ③ 重复以上步骤，直至在最后两个数中选取最小数，放在第n-1数组元素中。 ④ 最后第n个元素已是最大数了。 说明： （1）在设计界面时除了以前用过的命令按钮和标签以外，还用到列表框（Llistbox）控件,这个控件及其相关的内容将在本章作详细的讲解。 （2）编写代码时出现的 Dim Name(n) as string属于数组的定义，具体相关数组的使用及有关概念是本章的主要内容之一。 （3）排序交换数据时，应让姓名和成绩同时交换，若只交换成绩，则最终结果会张冠李戴。 【例5.2】在窗体上显示6种可以使用的形状，通过控件数组来实现，运行结果如图5.2（a）所示： 操作步骤如下： （1）设计用户界面： 根据程序的运行结果，用户可设计如图5.2（b）所示的界面。 设计过程如下： ①先将控件Shape放置在窗体上，并将其激活； ②执行复制命令（Ctrl+C），将该控件复制； ③执行粘贴命令(Ctrl+V)，将显示一个对话框，询问“已经有一个控件为’Shape1’，是否创建控件数组？” ④选择“是”，窗体左上角将出现一个控件，它就是控件数组的第二个元素。 ⑤执行粘切命令(Ctrl+V)，建立控件数组的其它元素。将其放在合适的位置并可用菜单栏的“格式”对其进行设置。 （2）编写代码 在窗体中只放置控件数组，而要输入对应的标号需通过print方法来实现，对于Shape1控件数组中各元素的形状由Shape控件的Shape属性来完成，形状的填充由Shape控件的FillStyle属性实现，具体的过程如下： Private Sub Form_Click() FontSize = 12 CurrentX = 280 Print 0; ‘设置形状对应的标号 For i = 1 To 5 Shape1(i).Left = Shape1(i - 1).Left + 800 Shape1(i).Shape = i ‘设置shape1控件数组的形状 Shape1(i).FillStyle = i + 2 ‘填充shape1控件数组 Shape1(i).Visible = True ‘使得shape1(i)可见 CurrentX = CurrentX + 500 Print i; Next i End Sub (3) 运行程序，验证结果 运行程序，单击窗体后出现如图5.2（a）所示结果。 说明： （1）在设计界面时使用了Shape控件,这个控件及其相关的内容将在本章作详细的讲解。 （2）编写代码使用了控件数