第六节 圣诞贺卡,粤教版 八年级下,粤教版初中信息技术,课件,新知导入,节日里，我们经常用贺卡送朋友、老师、家人；那么，能不能利用VB来制作一个漂亮的贺卡呢？,新知讲解,一、分析圣诞彩灯的制作方法,1、彩灯颜色的变换,计算机中，每种颜色都是由红（R）、绿（G）、蓝（B）三种基本颜色按不同的比例生成的。VB中使用RGB函数来设置颜色。格式为： RGB（红色值，绿色值，蓝色值） 每种颜色值的取值范围：0255。,新知讲解,2、多只彩灯的控制,添加Shape控件，属性设置为3-Circle作为第一个彩灯； 添加Timer控件，周期性重复执行12只彩灯的变色，使颜色不停变换。,新知讲解,二、For循环语句,假设打印数字1、2、3.10，每个数字占一行，顺序执行10条print语句。,新知讲解,若将10改为100，,1000呢？该怎么编写？VB中用For循环语句专门做重复的工作。,新知讲解,for循环语句的格式如下： For循环变量=初值 To 终值 Step 步长值 语句组 Next 初值、终值、步长值均为数值型。 步长值：循环变量每次的增量，可为负数,新知讲解,（1）将循环变量赋初值 （2）比较循环变量是否大于终值。如大于，退出Next后面语句，如小于等于，运行一次循环体的语句。 （3）遇到Next语句，循环变量增加步长值，转步骤（2）继续循环。,循环变量=初值,循环变量超过终值,语句组,循环变量增加一个步长值,是,否,新知讲解,（1）试用For循环编写计算1+2+3+.100,代码： Private Sub Form_Click() For i = 1 To 100 s = s + i Next i End Sub,新知讲解,（2）结合For语句的执行过程，说说当步长值为负数时，For循环的执行过程。,如： For i=20 to 0 Step -2 循环体 Next i 说明从20到0，以步长为-2，循环10次,新知讲解,三、用循环结构优化彩灯控制,12只彩灯，都是重复性的工作，可用循环结构描述。,j=0,j11?,随机设置第i只灯的颜色,j=j+1,是,否,（1）对循环变量j赋初值。 （2）比较j是否大于11。如大于，退出Next后面语句，如小于等于，运行一次循环体的语句，将j个彩灯变换颜色。,新知讲解,（1）阅读图2-38“圣诞贺卡”代码编辑窗口，将彩灯增加到15个，下列代码如何修改？ 改：For j=0 to 16 step 1,新知讲解,（2）程序输入完毕后，按F8键逐步语句执行程序，将鼠标指向循环体中变量j，稍停片刻，就会显示变量j的当前值。通过此方式，监视循环变量j的变化，并将结果填入表中。,新知讲解,（1）设计一个M*N的方格，要求每个格子能随机变换颜色，如图：,新知讲解,（2）执行下面代码，变量s的值是：______,新知讲解,重复循环除了For语句，还可以用Do循环语句,格式： Do While 循环体 Loop,循环条件满足吗？,循环体,否,是,课后习题,1、For.Next循环结构中（ C）用来控制变量. A.for B. step C. next D. to,2、For.Next循环结构中step用来控制（D） A.循环变量 B.循环变量初值 C.循环变量终值 D.T循环变量增量,课后习题,3、For.Next循环结构中循环变量初值大于终值时，步长为（A）。 A、负数 B、非负数 C、正整数 D、正数,课堂总结,1、for循环语句的格式如下： For循环变量=初值 To 终值 Step 步长值 语句组 Next 初值、终值、步长值均为数值型。 步长值：循环变量每次的增量，可为负数 2、RGB（红色值，绿色值，蓝色值） 每种颜色值的取值范围：0255。,板书设计,一、分析圣诞彩灯的制作方法。 二、For循环语句。 三、用循环结构优化彩灯控制