
课件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语言的编程环境,体验程序的作用,了解计算机程序解决问题的优势,利用程序帮助我们解决学习生活中遇到的一些问题。
~~ 您好,已阅读到文档的结尾了 ~~