7
思考： 1. 如何画出彩色的曲线？ 2. 如何画出x y轴的箭头y=sin(x)的前提下，继续制 作y=cos(x),y=x^2以及画圆、画椭圆的曲线。 ▪ 以上分别制作单独按钮予以实现。
❖ 能否利用所学知识实现其他图形的绘制？
2020/3/4
9
2020/3/4
点的粗细
Picture1.PSet (1, 0), RGB(255, 0, 0)
位置（x,y）
颜色
2020/3/4
6
如何实现重复画点： dim x, y as single; For x =1 to 10 step 1
y = Sin(x) Pict?ure1.PSet (x, y) next x
2020/3/4
2020/3/4
5
先来看看如何画点：
2. 绘制x y轴 Picture1.Scale (-10, 10)-(10, -10) '定位坐标系 Picture1.Line (-10, 0)-(10, 0) 'X轴 Picture1.Line (0, -10)-(0, 10) ‘Y轴
3. 画点
Picture1.DrawWidth = 5
再探For语句
函数图像生成器的制作
曹毅
2020/3/4
1
上期回顾： ❖ 循环结构：
▪ 在计算机中，重复做某件事，可以用循环来解
决问题。
For 循环变量=初值 To 终值 [Step 步长]
语句组（循环体）
Next 循环变量
2020/3/4
2
实用小工具——函数图像生成器 ❖ 如图所示，不解释。
2020/3/4
3
算法分析
❖ 线由点组成，绘制函数曲线就是按照一定的规则
在坐标系中重复画点而成。
2020/3/4
4
先来看看如何画点：
1. 构建一个坐标系： ▪ Picture1.Scale (X1,Y1) - (X2,Y2)
▪ (x1,y1)指图片左上角的横、纵坐标
▪ (x2,y3)指图片右下角的横、纵坐标
▪ 例如：Scale (-10,10) - (10,-10) 定义了绘图 区域大小为20×20，坐标原点（0，0）在绘 图区域中心。
10