VB程序设计(第2版)教学课件5-5-控件数组

1、VB程序设计控件数组VB程序设计控件数组问题引入 窗体上，相同的控件可以用下标来标识吗？问题引入 窗体上，相同的控件可以用下标来标识吗？列表框 控件数组概述1 控件数组的建立方法及说明2 控件数组应用3控件数组列表框 控件数组概述1 控件数组概述1 在应用程序中常用到一些类型相同且功能类似的控件，可将这些相同的控件视为一个数组，即“控件数组”。控件数组与普通数组类似，有如下特点： 具有相同的控件名称(Name)。 用下标索引值(Index)来识别各个控件。如：Text1(0)、Text1(1)、。控件数组概述1 在应用程序中常用到一些类型相同且控件数组建立方法2【控件数组的建立方法】【方法1】

2、利用为控件数组命名方法建立控件数组 在窗体上添加同一类型的多个控件。如：Text1、Text2 单击Text2，使其处于选定状态。 在属性窗口选择“名称”，即Name属性，并修改控件名称，即：Text1，显示对话框，单击“是”，则建立控件数组。 对要加到数组中的控件重复第、步，输入与第步相同的名称。控件数组建立方法2【控件数组的建立方法】【方法1】利用为控件控件数组建立方法2【控件数组的建立方法】【方法2】利用复制的方法建立控件数组 在窗体添加一个控件，并选定该控件。 “编辑”“复制” 。 “编辑”“粘贴”，显示如图对话框。 单击“是”，窗体左上角将出现一个控件，它就是控件数组的第二个元素。

3、继续执行“编辑” “粘贴” ，建立控件数组的其他元素。控件数组建立方法2【控件数组的建立方法】【方法2】利用复制的控件数组说明2【说明】 控件数组建立后，只要改变一个控件的“名称”属性，即Name属性，并将Index属性置为空（不是0），则该控件从控件数组中删除。 建立了控件数组之后，控件数组中所有控件触发同一事件过程，由事件过程根据不同的Index值执行不同的操作。控件数组说明2【说明】 控件数组建立后，只要改变一个控件的动态数组应用3【应用】建立2个数组控件Text1、Text2，每个数组控件具有10个元素，随机产生10个3位整数放入控件数组Text1中，重新排列这10个数，将其中的奇数放

4、在前，偶数放在后，重排后的数据放入Text2中。界面设计动态数组应用3【应用】建立2个数组控件Text1、Text2动态数组应用3代码设计Dim n As IntegerPrivate Sub Command1_Click() Dim i% Randomize n = 0 For i = 0 To 9 Text1(i).Text = Int(100 + Rnd * 900) 产生10个3位数 If Text1(i).Text Mod 2 0 Then n = n + 1 统计奇数个数 End If Next iEnd Sub动态数组应用3代码设计Dim n As Integer动态数组应用3代码设计Private Sub Command2_Click() Dim i%, j%, k% i = 0: j = n For k = 0 To 9 将奇数放在前 If Text1(k).Text Mod 2 0 Then Text2(i).Text = Text1(k).Text i = i + 1 Else Text2(j).Text = Text1(k).Text j = j + 1 End If Next kEnd Sub动态数组应用3代码设计Private Sub Command总 结 可将相同的控件视为一个数组，即“控件数组”