高二下高教版可视化编程应用基础—Visual Basic任务2.6制作颜色选择器（一）课件

2.6 制作颜色选择器(一) 可视化编程应用基础——visual Basic (陈建军) 1 导入：认识颜色选择器 颜色选择器程序效果，通过单击颜色选择器改变标签中文字的颜色。（图片链接源程序） 2 知识集中营 Frame框架 控件数组 3 任务1：界面设计 Lable1宋体,72号 Frame1框架 4 框架的作用 框架是VB中提供的一种特殊的控件，用来将窗体上的控件进行分组，将控件放置在框架内，则这些控件会随着框架的移动而移动。 任务2：标签数组添加 Label标签数组 6 当需要存储、处理大量具有、共同特性的数据时，靠单个变量存储、处理已经无能为力，因此引入了数组。引入控件数组的需要与引入数组情况类似，也是为了方便使用同一种类型的控件。 为什么引入控件数组 如左图，如果想通过单击label标签改变窗体背景，可以通过以下代码实现： Private Sub Label1_Click() Private Sub Label2_Click() Form1.BackColor = Label2.BackColor Form1.BackColor = Label1.BackColor End Sub End Sub 当有3个、4个标签时也还可以通过上述方法实现，但如有有16个标签甚至更多标签实现类似效果，此时这种方法变得繁琐。此时利用控件数组可以相对简便地实现。 7 如何创建控件数组 方法1： ①在窗体上创建第一个控件，调整好控件属性 ②选中这个控件，右键打开快捷菜单，选择“复制”命令 ③再在窗体的空白处右击打开快捷菜单，选择“粘贴”命令。 ④在选择“粘贴”命令后，系统会弹出一个“是否创建控件数组”的消息框，单击“是”即可创建一个控件数组。 方法2： 对于已在窗体中的多个同类控件，可直接将控件改成统一名称即可。这样创建的控件数组除了名称一样，其余属性都保留各自创建时的属性。 8 任务3：控件数组的使用 任务说明：通过单击任务1中设计的颜色标签，文字标签中的文字颜色相应发生变化，即通过颜色选择器更改文字颜色，可采取两种方法： ①多支选择结构实现 ②直接用控件数组的index属性实现 9 多支选择语句 采用多分支选择语句时，须进行判断，根据判断结果，将本文设置为相对应的颜色，此时须用到多分支选择语句select case语句（该语句可以替代多个if/elseif语句，使程序具有较好的可读性），其结构如右： Select case 表达式 case 表达式列表1 语句块1 case 表达式列表2 语句块2 case 表达式列表3 语句块3 …… case 表达式列表n 语句块n case else 语句块n+1 End select 表达式的表示方法有以下几种： (1)可以取一个或多个具体值，多个值之间用逗号,分隔，如case 85,90,100 (2)表示取值范围，如case 84 to 100 (3)变量表示，如case FS (4)Is关系运算符表达式，如case Is>=85 (5)综合多种表达式，如case 84,Is>=100 10 利用控件数组index属性 空间数组的使用和数组 使用类同，其元素与独立控件使用上没有区别，只是增加了下标，如label1(i)。 本例实现： Private Sub Label2_Click(Index As Integer) Label1.ForeColor = Label2(Index).BackColor End Sub 11 作业 利用控件数组实现教材P72页《循环闪烁的多彩霓虹灯》效果。 12 $