课件19张PPT。科技改变未来视频欣赏体验程序的作用及其编制环境The role of experience program and compile environment学习目标12体验程序初识 Visual Basic——VB 认识VB的操作界面
能操作运行程序
会查看程序代码
会生成可执行的exe文件知道程序的作用
能修改简单的程序代码
说出程序的实际应用案例初识VB界面窗体设计器初识VB打开开始程序VB“现存”选项卡—打开文件程序体验之旅开启4.1.2课文件夹中
——学习任务清单.doc
按清单中的要求完成任务一
回答问题 For x = -2 To 2 Step 0.01
y = 0.5 * x * Sin(x) * Cos(500 * x)
Picture1.PSet (x, y), RGB(0, 0, 255)
Next xx= -10to10修改描点先后可以看出：曲线的长度发生了改变程序体验初识修改之美程序体验初识修改之美 For x = -2 To 2 Step 0.01
y = 0.5 * x * Sin(x) * Cos(500 * x)
Picture1.PSet (x, y), RGB(0, 0, 255)
Next x0.00001修改步长可以看出：曲线的点密集了 For x = -2 To 2 Step 0.01
y = 0.5 * x * Sin(x) * Cos(500 * x)
Picture1.PSet (x, y), RGB(0, 0, 255)
Next xpicture1.pset(y,x)修改描点先后可以看出：曲线的纵横发生了改变程序体验初识修改之美 For x = -2 To 2 Step 0.01
y = 0.5 * x * Sin(x) * Cos(500 * x)
Picture1.PSet (x, y), RGB(0, 0, 255)
Next xRGB(255,10,136)修改RGB可以看出：曲线的颜色改变了程序体验初识修改之美绘制出上面的曲线程序实操运用模仿之美绘制出上面的曲线程序提高训练运用之美 Private Sub Command1_Click()
For x = -10 To 10 Step 0.0001
Picture1.PSet (x, y), RGB(255, 0, 0)
Next x
End Suby=Sin(x) * Cos(x ^ 6)程序提高训练运用之美 Private Sub Command1_Click()
For x = -10 To 10 Step 0.0001
Picture1.PSet (x, y), RGB(255, 0, 0)
Next x
End Suby=0.001-x*Cos(x)* Sin(x*50)程序提高训练运用之美 Private Sub Command1_Click()
For x = -10 To 10 Step 0.0001
Picture1.PSet (x, y), RGB(255, 0, 0)
Next x
End Suby=Sin(50*x)*Tan(50 * x)程序提高训练运用之美制作自己的创意曲线
要求：
作品名：姓名+机器号
作品格式类型：.EXE
上交地址：ftp://10.97.141.2班级文件夹注：EXE文件生成操作：
文件——生成曲线.exe——确定程序创意探究创意之美程序探究之乐破解之乐双击程序进行破解之旅：大家开动脑筋，进行破解之乐吧！
这个程序的作用是什么呢？程序现实应用说一说在日常的生活、学习中，我们都可以在哪里看到程序的应用？知识小结12体验程序初识 Visual Basic——VB 认识VB的操作界面
能操作运行程序
会查看程序代码
会生成可执行的exe文件知道程序的作用
能修改简单的程序代码
说出程序的实际应用案例
