操作方法
1、走进编程 在数学课上我们如何画出在区间[-10,10]y=x^2图像的? 既然我们知道如何画出这样一个图像?那计算机知不知道如何才能画出这样一个图像呢?
2、初试代码 Private Sub Command1_Click() '确定命令按钮的单击事件 Dim x, y As Single '定义x,y两个变量 Picture1.DrawWidth = 2 '定义粗细 Picture1.Scale (-10, 10)-(10, -10) '定义坐标系 Picture1.Line (-10, 0)-(10, 0), RGB(0, 0, 255) '定义橫坐标轴,颜色为蓝色 Picture1.Line (0, -10)-(0, 10), RGB(0, 0, 255) '定义纵坐标轴,颜色为蓝色 Picture1.Line (0, 10)-(-0.125, 9.5), RGB(0, 0, 255) '画纵坐标轴左箭头,颜色为蓝色 Picture1.Line (0, 10)-(0.125, 9.5), RGB(0, 0, 255) '画纵坐标轴右箭头,颜色为蓝色 Picture1.Line (10, 0)-(9.5, 0.125), RGB(0, 0, 255) '画横坐标轴上箭头,颜色为蓝色 Picture1.Line (10, 0)-(9.5, -0.125), RGB(0, 0, 255) '画横坐标轴下箭头,颜色为蓝色 '用循环语句描点画函数图像 For x = -10 To 10 Step 0.05 'x的取值从-10变化到10,每次增量为0.05 y = x^2 '根据表达式y=x^2来计算y的值 Picture1.PSet (x, y), RGB(0, 255, 0) '根据x,y值用绿色描点 Next x '取下一个增量后的x值 End Sub '结束事件
3、理论储备 计算机加工信息的步骤?
4、自主探究 任务1修改代码,运行程序,观察记录图像变化
5、能力提升 任务2 怎样在同一坐标系中同时绘出y=x^2和y=-x^2的图像?
6、大显身手 以抛物线文件为模板,尝试绘出下面函数图象
7、创意无限 根据下发玫瑰曲线为模板,创意自己喜欢的曲线
8、学以致用 借助于图象,研究函数x^2=cos(x)在[-2,2]解的个数?