绘制次函数曲线.docVIP

沈阳航空工业学院 课　程　设　计 　　　　　　 班 级：6403401 学 号：200604034003 姓 名：张　 石 指导教师：刘 　成 2008 年 3 月 18 日 沈阳航空工业学院 课程设计任务书 学院：航宇 专业：工程力学 班级：6403401 学号：200604034003 题目：绘制2次函数曲线 一、课程设计时间 2007~08第2学期第1~2周，共计2周，40学时。 二、课程设计内容 在窗体上绘制一元二次函数ax2+bx+c。其中系数a , b , c ，以及x的取值范围，均由用户从键盘输入。 三、课程设计要求 程序质量： 贯彻事件驱动的程序设计思想。 用户界面友好，功能明确，操作方便；可以加以其它功能或修饰。 用户界面中的菜单至少应包括“输入系数”、“输入x的区间”、“开始绘制”、“退出”4项。 代码应适当缩进，并给出必要的注释，以增强程序的可读性。 课程设计说明书： 课程结束后，上交课程设计说明书和源程序。课程设计说明书的内容参见提供的模板。 四、指导教师和学生签字 指导教师：________ 学生签名：________ 五、成绩 六、教师评语 目 录 需求分析 4 设计分析 4 关键技术 4 总结 6 程序界面 6 完整的程序.......................................................................................................7 参考文献..................................................................................9 需求分析 在窗体上绘制一元二次函数a * x ^ 2 + b * x + c。其中系数a，b，c，以及x的取值范围，均由用户从键盘输入。 设计分析 （1）基本原理：利用Pset函数在图片框中绘制曲线图 （2）详细设计： 关键技术 1.建立坐标系，标出坐标轴及坐标原点 Private Sub Command1_Click() Picture1.Scale (-10, 25)-(10, -25) 定义坐标系，标出x轴、y轴和坐标原点 Picture1.Line (-10, 0)-(10, 0) Picture1.Line (0, 25)-(0, -25) Picture1.CurrentX = 0: Picture1.CurrentY = 0: Picture1.Print 0 Picture1.CurrentX = 9: Picture1.CurrentY = 1: Picture1.Print X Picture1.CurrentX = 1: Picture1.CurrentY = 24: Picture1.Print Y End Sub 2.利用for循环在图片框中画出曲线图 程序如下： Dim x As Single, y As Single, a As Single, b As Single, c As Single 定义变量类型 a = Val(Text1.Text): b = Val(Text2.Text): c = Val(Text3.Text) 在图片框中画出曲线图 For x = Val(Text4.Text) To Val(Text5.Text) Step 0.01 y = a * x ^ 2 + b * x + c Picture1.PSet (x, y) Next x 当a=3，b=15，c=-2，x的范围为-10到10时，绘图如下： 3.对x的取值范围做一定的限制，检验x的取值是否是从小到大的、是否在所定义坐标的内。 程序如下： Private Sub Text4_KeyDown(KeyCode As Integer, Shift As Integer) If Val(Text4.Text) 10 Or Val(Text4.Text) -10 Then Te