Question

VB 求积分 程序设计作业

一、设计题目：求积分
说明：在求积分的算法实现的基础上把积分曲线绘制出来。
二、目的与要求
2.基本要求
 能够完成常用内部函数的绘制。
 能够在Picturebox控件中完成自定义坐标系，包括绘制原点及添加注释性文字，如所选曲线的名称“正弦曲线”等。坐标轴和文字的颜色可自定。
 曲线的像素点的颜色要求包括两种以上的颜色。
 “范围”框架处要求根据所绘制的曲线段给出最佳显示范围，以便使积分曲线达到最佳的可视化。
 求积分至少使用“矩形法”和“梯形法”两种方法。
 函数的选择要求使用Combobox 控件实现。
 积分方法的选择要求使用Option控件实现。
 函数曲线的绘制可以使用Line方法或Pset方法。
 积分小矩形或小梯形使用Line方法实现，不过是有区别的哦。
3.创新要求
在基本要求达到后，必须进行创新设计，创新点可以自己选择，方向提示如下：
★ 支持函数曲线的平移功能，以便能看到更多的范围。
★ 支持较复杂的表达式的识别。
★ 支持函数曲线的放大和缩小功能。
★ 增加积分方法，如“辛普森法”的计算。

三、设计方法和基本原理
1.问题描述
程序界面较简单见题图，大家都应该较容易理解，还需要说一下吗？
2.问题的解决方案
①设计程序界面
因为用的全是基本控件，界面设计没有什么难度，照样子拼就可以了。
②编写代码
代码主要包括事件处理过程。
事件处理包括下面的主要事件：
Form_Load()
作一些初始化的工作。主要是载入函数。
Command1_Click() ‘求积分并绘制积分曲线
当完成函数绘制后，选择积分范围和积分方法，单击此按扭，按照选定的方法计算积分并完成积分曲线的绘制。
Combo1_Click() ‘函数选择与绘制
主要包括选择完函数后，进行自定义坐标系、确定可视范围及函数的曲线绘制等。
四、主要技术问题的描述
本题中的难点并不在于界面设计。核心问题在于根据选择的函数自定义坐标系、使用Pset绘制像素点的方法绘制曲线及使用Line方法绘制积分小图形---矩形或梯形。下面举例说明原理。
比如说对sin(x)函数计算积分并绘制积分曲线。
可以用Picturebox 的Scalemode属性设置一种度量单位，如像素，具体如下：
Picture1.scalemode=3
根据选取的函数sin(x)使用Picturebox 的Scale方法自定义坐标系，如
Picture1.Scale (m1, n1)-(m2, n2)
(m1, n1)表示绘制范围的左上角，(m2, n2) 表示绘制范围的右下角。
注释文字使用Picturebox 的print方法。如
Picture1.Print "正弦曲线"
本题要求变换正弦曲线的像素点颜色，可以使用下面的方法，也可以使用rnd函数生成随机颜色作用到像素点上。
If Picture1.Point(i, Sin(i)) = &HFF& Then
Picture1.ForeColor = &HFF00&
Else
Picture1.ForeColor = &HFF&
End If

另外积分小图形的绘制，一个是绘制小矩形，另一个是绘制小梯形，都使用Line方法，但是有区别的，绘制小矩形可以直接使用Line方法完成，如：
Picture1.line (500, 500)-(1000,1000),rgb(255,0,0),B
而绘制小梯形必须使用4次Line方法绘制4条直线完成，如：
Picture1.line (500, 500)-(1000,1000),rgb(255,0,0)
关于具体的计算积分过程就不用说了，教材上都有，这是最基本的算法。

五、参考资料
★ Visual Basic 程序设计教程 及 Visual Basic 实验教程
★ VB6.0程序员指南
★ VB6.0控件参考手册
★ 设计资料中的scientificcalculator.ZIP以及“计算器.ZIP”
★ MSDN中文版，课程设计网站上提供的其它资料。
做完要源代码，及所有程序和报告，发送发到邮箱：lishiyu88@yahoo.cn
QQ:1047590503

Answer 1

这个其实很简单，计算的就不说了，画曲线的话用Pset函数，虽然效率有点低，但是用起来很简单，当然也可以用API函数

我之前写个几个画图的程序，但是我的电脑在同学那，现在用别人电脑，没法给你写

Answer 2

告诉QQ联系联系。