信息的编程加工导学案
- 格式：doc
- 大小：23.55 KB
- 文档页数：2
3.2信息的编程加工导学案
类比图：演出——调试程序的过程
【原代码解析】
Private Sub Command1_Click() '①单击按钮Command1时开始运行程序
Dim x,y As Single '②定义x,y两个变量
Picture1.Scale (-10,25)-(10,-25) '③在Picture1内定义坐标系，范围为(-10,25)至(10,-25)
Picture1.Line (-10,0)-(10,0),RGB(0,0,255) '④在Picture1内画x轴，位置为(-10,0)-(10,0)，颜色为蓝色
Picture1.Line (0,25)-(0,-25),RGB(0,0,255) '⑤在Picture1内画y轴，位置为(0,25)-(0,-25)，颜色为蓝色
For x=-10 To 10 Step 0.0001 '⑥x值从-10变化到10，每次增量为0.0001
y=x^2 '⑦根据x的值算出y的值
Picture1.Pset(x,y),RGB(255,0,0) '⑧根据x,y的值在Picture1内相应坐标处用红色描点
Next x '⑨返回For语句取下一组数据
End Sub '⑩结束程序
Private Sub Command2_Click() '①单击按钮Command2时开始运行程序
Picture1.Cls '②Picture1清除图像
End Sub '③结束程序
活动1：设计运行程序 并组内相互演示
设计对象窗口：在对象窗口中添加1个PictureBox，2个CommandButton控件，并修改相关属性（Command1、2的Caption、Font属性）。打开程序代码文件，把程序1的代码粘贴到代码窗口后，调试运行。
思考：把第一个按钮的名称属性中的Command1改为Command3，能否正确运行？
1.新建工程，选择“标准exe”，打开
2.单击PictureBox控件，在到默认窗体From1拖动鼠标左键放置该控件。
3.单击按钮控件(CommandButton)，在到默认窗体From1拖动鼠标左键放置该控件，Caption的属性设置为“描绘” 演员上场 布置两个控件工具（左侧工具栏选中后描绘）
演员化妆 对控件进行属性设置（如名称【Name】）、背景颜色【Backcolour】、字体【Font】、文字【Caption】）。
加入剧本 将源程序放入代码窗口（视图菜单-代码窗口）
欣赏演出 启动程序 4.单击按钮控件(CommandButton)，在到默认窗体From1拖动鼠标左键放置该控件，Caption的属性设置为“清除”
5.打开代码窗口（视图菜单-代码窗口），将代码复制到代码窗口
活动2：修改代码
对照下表，阅读【原代码解析】理解源代码，并完成以下填空（每空1分）。
1．将第7句改为y=x,观察图像变化。函数图像由抛物线变为 。
2．将第4、5句中的RGB(0,0,255)改为RGB(0,255,0)，观察图像变化。
部分的颜色变为 。
3． 将第6句的Step 0.0001改为 Step 0.1，观察图像变化。
思考：抛物线由实线变为了 。
拓展训练：
1.自行修改代码，修改成y =Cos(x)函数图像（要求：函数曲线为红色）。
2.完成“密码验证VB小程序”。
