广教版信息技术全一册必修 4.1 编制计算机程序解决问题课件（共13张ppt)

课件13张PPT。12　　通过在VB中执行一段简单的计算机程序，了解程序的编制环境，体验程序的作用，并能简单的对程序进行修改。
　　初步理解计算机程序代码的执行目的。　 VB6.0应用程序集成开发环境(1)控件
工具箱窗体设计器工程资源
管理器属性
窗口窗体布局
窗口菜单栏工具栏启动、中断、
结束程序Print(″abcd″) Private Sub Command1_Click()
For x = -10 To 10 Step 0.0001
y = x^2
Picture1.PSet (x, y), RGB(255,0,0)
Next x
End Sub ’x值从-10变化到10， 每次增量为0.0001

’根据表达式y=x2来计算y值

’描一个点(x,y), 颜色为红色
’取下一个x值:x+step0.0001255,0,0x, y-1010 Private Sub Command1_Click()
For x = -10 To 10 Step 0.0001
y = x^2
Picture1.PSet (x, y), RGB(255,0,0)
Next x
End Suby=Sin(x) * Cos(x ^ 3) + Atn(x)
y=0.001 - x * Cos(x) * Sin(x * 30)
y=Tan(30 * x) * Sin(30 * x)/x
For i = -44 To 44 Step 0.0001
x = 4 * Cos(i *2.718281828) * Cos(i)
y = 4 * Cos(i *2.718281828) * Sin(i) Private Sub Command1_Click(Index As Integer)
For x = -10 To 10 Step 0.0001
y = x^2
Picture1.PSet (x, y), RGB(255,0,0)
Next x 任务3：怎样在同一坐标系中同时绘出y=x^2和y=-x^2的图像？For x = -10 To 10 Step 0.0001
y = x^2
Picture1.PSet (x, y), RGB(255,0,0)
Next xEnd Suby = -x^2

Next xEnd Sub y = x^2
Picture1.PSet (x, y), RGB(255,0,0)y = -x^2 -y
任务4：修改代码，绘出如下图像：
任务5：制作自己的创意曲线。
在桌面上保存成exe可执行文件，
文件名为自己的组号姓名（如01张丽.exe），并提交作业。借助函数图像，研究此方程解的个数:
3cosx=x2 /30 (-9<=x<=9)
（注意:在代码中函数解析式分别写为： 3*cos(x )；x^2/30），将求解曲线以“组号姓名2.exe”为名保存并上交。通过体验程序，认识VB语言的编程环境，体验程序的作用，了解计算机程序解决问题的优势，利用程序帮助我们解决学习生活中遇到的一些问题。