初中vb教学问题与方法-广州中小学信息技术教研会.pptVIP

初二VB教学研讨 广州市教育局教学研究室编写的 初中《信息技术》第二册第二章 《程序设计初步》 一、问题的提出 二、组织好相关的例程，解决学生感觉 难学的知识点 然后对程序进行修改： 从学生熟悉的课本中的画圆程序入手： 然后再把圆心也改为随机： 最后把圆的颜色也改为随机： 9、控件的学习，进一步提高学生学习的兴趣 2、课堂上多提供可递进变化的例程 3、加强一些常规手段和方法 4、VB的内容非常多，哪些内容是要学生掌握的，学完后将书本知识进行归纳总结，让学生对所学VB有一个较为全面的认识。 DIM X , I AS INTEGER X=1 FOR I=9 TO 1 STEP -1 X=2*（X+1） NEXT PRINT “第一天有：”；X；“只” 程序： 对VB的函数的学习比较难，这部分不是初二学生学习的重点，若有时间，也可让学生进一步掌握。 8、对函数的学习 ①让学生重点先掌握几个来逐步熟悉。 ABS（） SQR（） INT（） RND（） RGB（） ②随机抽号程序。随机产生一个学生的学号，发表意见。 RANDOMIZE A=INT（RND（）*50+1） PRINT A Private Sub Command1_Click() Dim X, Y, R, N1, N2, N3 As Integer X = 5000 Y = 4000 R = Int(Rnd() * 3000) + 200 Circle (X, Y), R End Sub 半径随机 只是半径发生随机变化。 ③几个常用函数中以随机函数和取整函数为最难，用以下例子让学生学习： Private Sub Command1_Click() Dim X, Y, R, N1, N2, N3 As Integer X = Int(Rnd() * 8000) Y = Int(Rnd() * 7000) R = Int(Rnd() * 3000) + 200 Circle (X, Y), R End Sub 圆心随机 圆心和半径都发生随机变化。 Private Sub Command1_Click() Dim X, Y, R, N1, N2, N3 As Integer X = Int(Rnd() * 8000) Y = Int(Rnd() * 7000) R = Int(Rnd() * 3000) + 200 N1 = Int(Rnd() * 256) N2 = Int(Rnd() * 256) N3 = Int(Rnd() * 256) Circle (X, Y), R, RGB(N1, N2, N3) End Sub 在不知不觉中学生对随机函数已经使用了多次。 颜色随机 如果课时允许的话，增加两节有关VB控件的学习，对提高学生学习程序设计的热情很有帮助。 例如：时钟与图像控件这一节： 1、准备五张JPG图片放在D盘指定文件夹PIC，文件名指定改为P1.JPG —— P5.JPG； 2、命令按钮的图形设置： 添加两个按钮?设置按钮Font属性?设置按钮Style属性?设置按钮Backcolor属性?设置另一按钮Picture属性?选定一个背景图片 3、添加一个图像框(image1)或图片框(picture1)； 4、双击命令按钮1添加程序： (1)在第一行前加全局变量说明：public m (2)按钮程序：每单击一次换一张图片，程序为： m = m + 1 If m 5 Then m = 1 pn = “D:\PIC\P + Trim(Str(m)) + .JPG Rem Form1.Picture1.Picture = LoadPicture(pn) Form1.Image1.Picture = LoadPicture(pn) 5、运行程序，多次单击按钮。 6、添加时钟控件，设置interval属性值为1000?双击时钟控件添加以上程序； 7、试运行； 8、解释与更改interval属性，再运行。 9、选择不同的图片，注意图片（格式）扩展名的不同。 这节课虽然有几个知识点学生没有接触过，如trim()等，但学生做起来一点也没有困难，特别是时钟控件，学生更感兴趣。 对VB这一章的教学上，可以围绕VB中画圆、画线（矩形）、画点这些简单的画图语句，再结合个别数学计算处理的例子进行教学，使内容上有一定的重复，加深学生的熟悉程度。 主要围绕某条主线进