论文-基于VB语言的发动机特性曲线绘制系统研究.doc

毕业设计报告(论文)报告(论文)题目: 基于VB语言的发动机特性曲 线绘制系统研究 作者所在系部： 机电工程学院 作者所在专业： 车辆工程 作者所在班级： B13142 作 者 姓 名 ： 杨阳 作 者 学 号 ： 201322383 指导教师姓名： 焦运景 完 成 时 间 ： 2017.6 北华航天工业学院教务处制北华航天工业学院毕业论文摘 要对车辆在运动的过程中进行分析要涉及到大量的编程，所以需要对车辆在运行过程中的各个参数进行计算和性能曲线的绘制，发动机的特性曲线就是研究对象之一。发动机的特性曲线包括速度特性曲线、负荷特性曲线以及万有特性曲线。 对汽车在运动过程中的参数变化用Visual Basic来进行分析编程。Visual Basic是一种面向对象的可视化的编程语言，通过这种可视化技术进行编程，可以让编程工作变得轻松方便，在编程的过程中不必面向对象进行繁琐的编程，而是将精力放在怎样优化设计方案上和对每个控件进行编程和设置属性，通过对控件编程来完成整个程序的有效运行，因此国内外Visual Basic在各个领域内广泛使用，编程人员通过操作Visual Basic来完成相应的开发任务，Visual Basic通过面向对象的基础来开发软件，并通过驱动事件的机制来完成对微软系统程序操作的响应。Visual Basic内拥有大量的控件，可以用来设计界面和实现各种功能，用户可以通过拖拽工具栏里的控件来设计所需的界面，通过对各个控件进行编程来完成相应的功能，这么做不但在很大程度上减轻了工作量，使设计界面得到简化以及省略了面向对象的复杂程序，而且很大程度上提升了应用程序的运行效率和实现各个控件功能的可靠程度。关键词：发动机外特性曲线 Visual Basic 可视化IAbstractIn the analysis of the process of vehicle operation will involve a lot of programming, so it need parameter calculation and drawing of performance curve, outside the engine characteristic curve is one of the research object. The characteristic curve of engine, including speed characteristic curve, the load characteristic curve and the universal characteristic curve.The car in motion parameters in the process of change to analysis programming with Visual Basic.Visual Basic is a Visual programming language, the use of this kind of visualization technology for programming, makes programming easy and quick, get rid of many of the details of the process oriented language, but will mainly focus on the solution actual problem and design a friendly interface. So the Visual Basic application in various fields at home and abroad is very broad, many computer professional and non-computer professional researchers often use it to prepare applications and software development. Its application development based on the object, and using event-driven mechanism realization of incident response for the Windows operating system. Visual Basic provides a large number of controls that can be used for interface design and implementation of various functions, users can be done through the drag and drop interface design, not only greatly reduce the workload and simplify the interface design process, and effectively improve the operation efficiency and reliability of the application. Keywords: The engine speed characteristic curve Visual Basic Visualization II目 录摘 要IAbstractII第1章 绪论.11.1课题背景11.2课题应用情况21.3课题的目的和意义21.4本文的研究内容3第2章发动机特性曲线图4 2.1 发动机特性曲线简介.4 2.2 如何看懂发动机特性曲线.4 2.2.1 看懂发动机速度特性曲线.4 2.2.2 看懂发动机负荷特性曲线图.6 2.2.3 看懂发动机万有特性曲线图.7 2.3 Visual Basic 6.0的特点.8 第3章 运用Visual Basic 6.0绘制发动机特性曲线图.9 3.1 发动机速度特性曲线绘制.9 3.1.1 发动机速度曲线绘制原理.9 3.1.2 发动机速度曲线绘制过程及程序.9 3.2 发动机负荷特性曲线绘制.17 3.3 发动机万有特性曲线拟合.22 总 结.24致 谢25参考文献.26第1章 绪 论1.1 课题背景在车辆的运行过程中对车辆进行分析要涉及到大量的编程，并且需要对车辆在运行过程中的各个参数进行计算和性能曲线的绘制，发动机的特性曲线就是研究对象之一。发动机的特性曲线包括发动机的速度曲线、发动机的负荷曲线和发动机的万有特性曲线。 发动机的速度特性曲线表示有效功率N(千瓦)、扭矩M(牛顿米)、比燃料消耗量g(克/千瓦小时)随发动机转速n而连续变化的表现1。发动机的在节气门全开的情况下得到的曲线称为外特性曲线，在节气门只开一定程度下得到的曲线称为发动机的速度特性曲线1。由于发动机的节气门可以开不同的程度，但是节气门全部开启只有一种情况，所以发动机可以有无数条速度特性曲线，但是只能有一条外特性曲线1。发动机的负荷特性曲线是发动机在某一转速保持不变的情况下，使节气门在不同的开度，由此测出发动机在特定时间内油耗率和油耗量随负荷的变化而变化的动态，并由此画出发动机负荷特性曲线图5。发动机万有特性曲线是表达多个参数的曲线图，通过在不同转速和负荷下的重要曲线画在万有特性曲线图上，从而可以看出在不同转速和负荷下发动机的比油耗率和燃油消耗量，从而发现汽车在某一转速和负荷下最经济的情况。01.2课题应用情况 在实际的生产生活中发动机运转时的数据较为复杂，可以通过图形将发动机的数据直观的反应到界面上，技术人员通过界面上的图像直观观察发动机的运转情况以及确定发动机的性能，找出发动机在某一速度和负荷下具有最佳的经济性和最低的燃油消耗率。发动机的特性曲线图是表示的是汽车发动机在多个不同的运转速度下输出的功率和扭矩的数值，所以从中可以看出发动机的参数表现如何。发动机的负荷特性曲线表明了在同一转速下发动机节气门在不同开度下的负荷变化，通过Visual Basic绘制图形可以更加直观的表明负荷随着节气门开度的变化而变化的状态，从而在某一转速下找到最佳的经济性及最低的燃油消耗。通过Visual Basic绘制发动机的万有特性曲线图可以直观的看到发动机各个参数的之间的相互联系，综合各方面考虑得到汽车行驶的最好的状态。1.3课题的目的和意义探寻发动机特性曲线的主要目的是找到发动机在转速相同的情况下，它的经济性指标和动力性指标的变化状况，即燃油消耗量和燃油消耗率等指标在发动机某一时间内的随发动机负荷的变化发生变化。从发动机特性曲线图中可以判断出在不同转速下运转时发动机的功率也随之发生变化。另外，在汽车使用的过程中速度特性的应用最广泛，因此在发动机实验过程中，经常使用速度特性当做性能指标评价的标准。同时负荷特性有助于发现发动机在同一转速下负荷的变化，从而找出在同一转速下节气门开度在某个范围时负荷最低，汽车的经济性最好。发动机的万有特性曲线则可以帮助使用者找出发动机在某一转速和负荷下燃油经济性为最佳的情况2。所以研究发动机特性曲线的目的在于能够正确的评价发动机的特性，为其他工作机械和汽车正确选用动力提供依据。同时，通过对发动机特性的评价与分析，为进一步改善发动机的性能使之与整车性能良好匹配提供有效的途径。将研究的结果通过Visual Basic更加直观的表现出来，实现发动机特性曲线图的可视化表示，便于技术人员更加深入的了解发动机性能。Visual Basic采用事件驱动的方式编写程序。在编写程序的过程当中，编写者不需要给出按顺序的很精确的步骤，只需要编写相应的控件所要完成一定功能的程序。通过各个控件的程序组合成整体的程序，而项目所要完成的功能由每个控件内编写好的程序来完成，从而降低了编程的工作量和难度，提高了程序开发的效率，节省了程序开发的时间。1.4本文的研究内容为了评价发动机在不同情况下动力性参数和经济性参数还有工作过程中所能进行的完整程度，就一定要研究发动机随工况变化动力性、经济性指标随之发生变化的关系，并且用曲线的形式表达这种关系，这就是发动机特性曲线。通过发动机速度特性曲线可以找出发动机在不同转速下工作时，其动力性能指标和经济性能指标的变化规律，从而能够找出特性曲线图上所对应的最大功率、最大扭矩和最低燃油消耗率时的转速，就可以确定发动机在最有利的转速范围内工作7。发动机动态曲线所显示的即时数据是发动机的监视系统是完成人机界面友好的重要组成部分，可帮助技术人员了解发动机ECU内部工作情况，以方便观察发动机的运转情况，这样有利于对程序进行即时在线修改，从而能够使发动机性能匹配达到最佳10。利用Visual Basic语言编程，测量的数据在屏幕上以数字和图形方式得以显示，通过Visual Basic绘制特性曲线，形成绘制系统，工程人员通过输入数据使曲线在窗口显示出来，有助于直接观察到发动机的实时运转的状态以及更加方便的找出发动机的最佳经济性的情况和不足。第2章发动机特性曲线图 2.1 发动机特性曲线简介发动机的特性主要通过发动机的各项性能指标随工况的变化特性来研究。发动机特性分为发动机的速度特性、负荷特性和万有特性。首先要先了解发动机的工况。发动机的工况是指发动机的运行状态，通常用发动机的转速n和负荷表示。其中转速表示发动机工作的频率，而负荷表示发动机对外做功的能力，主要用输出转矩T或平均有效压力表示。发动机的输出功率是表示发动机工况特征的重要综合指标，但是输出功率相同的情况下并不代表工况相同。所以正确认识发动机的工况或者在整车行驶过程中发动机输出功率相同的情况下，工况的正确选择对改善车的性能具有重要的意义。根据内燃机的工作原理及结构特点，其工况应该限制在最低稳定转速、最高转速以及在各工作转速下所能输出的最大功率所包围的范围内。根据工作机械对发动机的使用条件不同，可以将发动机的工况分为恒速工况、线工况和面工况。恒速工况是指发动机的转速不变，而功率随负载而变化的工况。线工况是指发动机的输出功率与转速成一定的函数关系的工况。面工况则是发动机的输出功率和转速之间没有确定的约束关系，在整个发动机工作范围内，功率和转速都相对独立变化，因此发动机的可能运行的范围就是实际情况的工作范围。通过发动机的不同工况下可以分为不同的发动机特性，将发动机的特性用图线表示出来，就是发动机特性曲线图。发动机特性曲线图分为发动机的速度特性曲线图、负荷特性曲线图和万有特性曲线图。发动机的速度特性曲线是发动机在不同转速下燃油消耗率、输出扭矩和功率与转速之间的关系1。发动机的负荷特性曲线是发动机在转速一定的情况下发动机的负荷随着节气门的开度变化而变化，由于转速不变，所以有效功率、转矩和平均有效压力之间互成比例关系，均可以表示为发动机负荷的大小。通过发动机的负荷特性曲线可以找出在转速不变的情况下，节气门在某一开度下发动机所承载的负荷最小，从而得到发动机负荷最佳的状态。发动机的万有特性曲线表明了发动机各种参数之间的关联，通过发动机的万有特性曲线可以综合得出发动机在某一转速和负荷下经济性能指标为最佳的情况。 2.2 如何看懂发动机特性曲线发动机特性曲线表示了发动机的动力性能，通过观察发动机特性曲线图可以发现发动机各个动力性能指标的变化情况，这在实际的生活中十分重要。所以看懂发动机特性曲线图对汽车的了解以及保养汽车都是非常重要的。发动机的性能指标主要取决于调整参数、使用因素和环境条件三个方面。发动机性能随调整参数的变化规律称为发动机的调整特性。使用因素主要是指发动机在运行时的实际工况，根据发动机使用工况的特点，发动机的特性曲线的分析方法分为线工况分析法和面工况分析法。线工况分析法是通过调整参数和固定参数的不同分为两种：在整个工况使用区域，固定负荷不变，研究发动机性能指标随转速变化规律，这种特性称为速度特性；固定转速不变，研究发动机的性能指标随负荷变化的规律称为负荷特性。面工况分析又称为万有特性，是在整个发动机工作的范围内分析发动机的各项性能指标随工况分布的情况。通过下面的例子可以了解怎样看发动机特性曲线图，从而为了解发动机各种动力性能打下坚实的知识基础。 2.2.1 看懂发动机速度特性曲线图发动机速度曲线图是发动机在不同转速而且节气门开度一定的情况下，燃油消耗率、输出功率和扭矩与转速的关系3。发动机速度特性曲线图分为外特性曲线和部分速度特性1。当发动机的节气门全开时得到的曲线为发动机外特性曲线，节气门部分开启得到的曲线为部分速度特性曲线。通过发动机的速度特性曲线图可以得出发动机在某一转速下对应的输出扭矩、功率以及燃油消耗量的数值。通常燃油消耗率曲线较为平缓，在某一转速下会达到最低值，在这一转速前和转速后都会比这一转速的燃油消耗率高。输出扭矩曲线会在一开始达到最大值，随着速度的增加扭矩值慢慢减少。功率会在开始逐渐增加，在达到最大值后随着转速的增加功率会逐渐下降。如图所示： 图2-1 发动机外特性曲线图通过这张图可以看出燃油消耗量较为平稳，会随着转速的增加而略有增加；功率的坡度较陡，随着发动机转速的增加几乎呈直线上升的状态；扭矩的坡度较功率的坡度平缓，在某一转速时达到最大值，在功率达到最大值后随着转速的增加功率降低。在发动机的转速为3000转/分时，节气门开到最大，此时燃油消耗率为290g/Kw.h，输出的扭矩大约为223N/M,发出的功率为70Kw。功率在5500转/分时功率达到最大值；在1000-2000转/分时燃油消耗率变化范围不大，说明在这个速度范围内燃油利用效率较高，随后随着发动机转速的增加燃油消耗率也随之上升。扭矩输出跨的转速范围较大，证明汽车在行驶过程中可供选择的范围较广。 2.2.2 看懂发动机负荷特性曲线图发动机的负荷特性是指发动机转速不变时，发动机各性能参数随着发动机节气门开度的变化而变化的关系1。在转速不变的情况下，有效功率、转矩和平均有效压力之间互成比例关系，都可以表示为发动机负荷的大小。由于汽油机和柴油机对负荷的调节方式不同，汽油机通过节气门开度的变化，从而调节进入气缸混合气的量并由此来控制负荷的大小，所以汽油机的负荷可用节气门的开度来表示。而柴油机则是通过调节向气缸内喷射的燃油量来控制负荷的大小，因此柴油机的负荷的大小可以用空燃比来表示。发动机的负荷特性曲线图呈凹型线，随着发动机输出功率的增加，燃油消耗率降到最低值，超过这一速度后燃油消耗率继续增加。如图所示：图2-2 发动机负荷特性曲线图通过上图可以看出发动机的燃油消耗率在某一输出下达到最低值，且是随着输出功率的增加燃油消耗率逐渐降到最低，不过在燃油消耗率达到最低时，随着输出功率的增加，燃油消耗率又重新增加。这是因为在一开始时，随着负荷的增加，机械效率随之增加，燃油消耗率随负荷的增加迅速降低。当负荷增加到大负荷时，由于要求发动机输出最大转矩，此时需要供给混合气。由于混合气燃烧并不充分，燃烧指示热效率降低。所以燃油消耗率随负荷的增加在降低到最低值以后在大负荷区随着负荷的增加而增加。从图中还可以看出，汽油机的负荷特性曲线相对于柴油机的负荷特性曲线上升的速度以及变化更大一些。造成这种现象的原因是由于汽油机和柴油机的调节方式不同，造成汽油机和柴油机的指示热效率随负荷特性的变化规律相反，并且柴油机的压缩比要比汽油机的压缩比高很多，使得其燃油消耗率随负荷的变化较为缓慢。当燃油消耗率最低点越低时汽车的发动机负荷特性越好，通过发动机负荷特性曲线的最低点可以看出发动机负荷特性的适应性及适应范围的好坏。 2.2.3 看懂发动机万有特性曲线图发动机的速度特性和负荷特性虽然能够给出发动机在某一条件下的各项性能指标，但是由于在实际生活中发动机运行工况较为复杂，仅仅依靠某一条件来分析发动机的各项动力性能是不够的，为了正确并且全面的分析动力性能，需要对汽车发动机在整个运行的工况内进行分析和评价发动机的性能。所以为了能够全方位的表示发动机在不同状况下的各种参数的变化情况，通常情况下运用很多参数性能变化规律的曲线都表示在同一张图上性能曲线，这个曲线被称为发动机万有特性曲线。在万有特性曲线图上纵坐标为平均有效压力，横坐标表示发动机的转速，通常采用负荷特性法和速度特性法来绘制发动机万有特性曲线图。在绘制万有特性曲线图时，首先绘制不同负荷下的速度特性曲线或者不同速度下的负荷特性曲线图，通过坐标转换的方法将负荷特性曲线或者速度特性曲线转换为万有特性曲线。如图所示：图2-3 发动机万有特性曲线图上图表示的是等油耗万有特性曲线图。横坐标为发动机的转速，纵坐标表示发动机的平均有效压力，图中每条曲线代表的是在这一油耗下的转速和平均有效压力的数值。其中最里面封闭的曲线代表了发动机最经济的运行工况区域，油耗线越往外，代表了发动机的燃油消耗率越高，经济性越差11。在转速或者是水平的方向，曲线代表了转速对发动机燃油经济性的影响，如果在等间隔的等油耗比较稀少，表明转速的变化对燃油消耗率的影8响较弱，反之则表明转速的变化对燃油消耗率的影响较大。同理在垂直方向上曲线分布密集，表明发动机的负荷对燃油消耗率的影响较大。所以对一般的发动机而言，封闭曲线在水平方向上越宽越好，这样在很大的转速范围内都能保证燃油消耗率为最低。 2.3 Visual Basic 6.0的特点自从1991年微软公司发布Visual Basic 1.0版本以来，Visual Basic在很长时间里都被程序开发人员推崇。经过近30年的发展，Visual Basic从1.0版本发展到6.0版本，还增加了.NET的版本，极大地丰富了Visual Basic的开发广度和深度。Visual Basic 6.0具有强大的画图功能、数据库功能、Internet访问功能以及多媒体功能等。运用Visual Basic 6.0进行编程可以省略面向对象的复杂程序，通过直接拖拽工具栏里想使用的控件，双击控件就可以编写程序和设置应有的属性，从而完成应有的功能。而传统的程序语言设计在编写过程中看不到实际的效果，在运行过程中才可以看到，这增加了编程人员的工作量，同时编写出来的程序缺乏统一性、通用性和实用性。所以Visual Basic比起传统的编程软件具有很大的优点。此外还可以通过Visual Basic 6.0进行数据库的设计和编程，同时也可以通过Visual Basic 6.0进行图画的编程。Visual Basic 6.0的可执行文件非常小，这是与其他的开发软件相比的一个很大的优势。所以Visual Basic 6.0在未来的很长一段时间内仍是微软最具有优势的开发软件之一，而且可以通过学习Visual Basic 6.0从而更加容易上手其他的开发软件。如果想要接触编程，可以从Visual Basic 6.0学起，Visual Basic 6.0简单易学容易上手，可以通过最简单的编程语言来完成较为复杂的过程，也可以为以后的编程素养打下坚实的基础。9第3章运用Visual Basic 6.0画发动机特性曲线图3.1 发动机速度特性曲线绘制发动机速度曲线图表明了发动机在节气门开度一定的情况下转速和扭矩以及输出功率之间的关系，通过绘制速度曲线图可以方便直观的观察各个参数之间的关系，为研究发动机动力性能提供了有力的工具。3.1.1 发动机速度特性曲线绘制原理发动机的速度特性是发动机的节气门在开度不变的情况下，通过改变发动机的转速，测得发动机在不同转速下输出功率、扭矩以及燃油消耗率变化的趋势3。发动机的速度特性由专门的试验台测试得到的7。通过测试得出发动机相应的数据，再通过一系列的编程，使数据直观的反应到电脑上，这样就可以让工程技术人员更加直观的发现发动机各个参数的变化趋势，从而评定发动机性能的好坏以及及时的发现发动机潜在的故障。运用Visual Basic6.0来画发动机特性曲线图可以很直观的将发动机各个数据及时的反映到Visual Basic6.0的窗体上，同时Visual Basic6.0具有易操作，简单易学的特点，可以通过直接在工具栏里拖拽所需要的控件来进行操作。通过直接双击控件来进行编写程序，省略了复杂的面向对象的过程，并且Visual Basic6.0具有强大的画图功能，可以通过编程来完成多种画图的功能，所以选择Visual Basic6.0来画发动机特性曲线图是非常明智的选择。8发动机速度特性曲线分为外特性和部分速度特性1。接下来通过下列程序分别绘制发动机外特性曲线和速度特性曲线。3.1.2 发动机速度特性曲线绘制过程及程序首先画发动机的外特性曲线图。在Visual Basic 6.0的窗体中调用两个命令控件和一个图画控件，将第一个命令控件命名为运行，第二命令控件命名为退出。首先对程序进行定义以及图片控件清屏操作：Private Sub Command1_Click()Dim i As IntegerPicture1.cls 在对程序进行初始化操作后，需要确定图画控件的工作范围以及字体和字号进行设定，程序如下所示：Picture1.FontSize = 8Picture1.AutoRedraw = True通过对字号和字体的基本限制，从而确定了曲线的宽度以及所输出的字体的大小和颜色，接下来需要绘制坐标轴以及箭头并对坐标轴做出标注：Picture1.Scale (-1, 12)-(12, -1)Picture1.Line (0, 0)-(0, 10)Picture1.Line (0.1, 9.7)-(0, 10)Picture1.Line (-0.1, 9.7)-(0, 10)Picture1.CurrentX = -0.8Picture1.CurrentY = 10.5Picture1.Print 扭矩(N/m)现在做出了坐标轴的第一条竖轴，现在通过循环变量i来绘制刻度线以及标注刻度：For i = 1 To 10Picture1.Line (-0.2, i)-(0, i)CurrentY = CurrentY + 0.6Picture1.Print i * 20 + 150Next i现在画功率的坐标轴，并且标注刻度以及刻度值：Picture1.ForeColor = vbBlackPicture1.Line (8, 5)-(8, 10)Picture1.Line (8.1, 9.7)-(8, 10)Picture1.Line (7.9, 9.7)-(8, 10)Picture1.CurrentX = 8.8Picture1.CurrentY = 10Picture1.Print 功率(Kw)For i = 5 To 10Picture1.Line (8.2, i)-(8, i) CurrentY = CurrentY + 0.6CurrentX = CurrentX - 0.8Picture1.Print i * 20-100Next i现在画油耗率的坐标轴以及标注刻度值：Picture1.Line (8, 0)-(8, 5)Picture1.CurrentX = 8.8Picture1.CurrentY =4Picture1.Print 油耗率(g/kw.h)For i = 0 To 4Picture1.Line (8.2, i)-(8, i)CurrentY = CurrentY + 0.6CurrentX = CurrentX - 0.8Picture1.Print 80*iNext i 画横轴并且标注刻度线及刻度：Picture1.ForeColor = vbBlackPicture1.Line (0, 0)-(8, 0)Picture1.Line (7.7, -0.1)-(8, 0)Picture1.Line (7.7, 0.1)-(8, 0)Picture1.CurrentX=8.5Picture1.CurrentY=-0.5Picture1.Print 转速(rpm)For i = 1 To 7Picture1.Line (i, -0.2)-(i, 0) CurrentY = CurrentY + 0.5Picture1.Print 800 + 300 * iNext i在画完各个坐标轴及标注好刻度后，现在开始画网格线，首先设置网格线的属性为虚线，然后通过循环变量i来画横着或者竖着的网格线：Picture1.DrawStyle = 4For i = 1 To 10Picture1.Line (0, i)-(8, i)Next iFor i = 1 To 7 Picture1.Line (i, 0)-(i, 10)Next i画完网格线后开始处理数据，将测得的数据变成可以展示在窗口的数据，在这过程中需要涉及到坐标的变换，此时所需要的数据为输出功率及扭矩还有转速的数据，现在令转速原来的数据为x1，输出功率原有的数据为y1，转矩原有的数据为z1，油耗率原有的数据为s1，变换后的转速的数据为X1，输出功率变换后的数据为Y1，转矩变换后的数据为Z1，油耗率变换后的数据为S1，则X1=1+（x1-1100）*1/30；Y1=5+y1/20；Z1=1+(x1-170）*1/20；S1=s1/80；进过此坐标变换后，将原来的数据转变为反应在VB图像上的数据，最后运用line的画图函数将各个点按照顺序连起来，最后形成一条曲线。程序如下所示：Picture1.DrawStyle = 6Picture1.Line (1.4, 6.9)-(2.2, 7.1)Picture1.Line (2.2, 7.1)-(2.98, 7.13)Picture1.Line (2.98, 7.13)-(3.8, 7.26)Picture1.Line (3.8, 7.26)-(4.6, 8.15) Picture1.Line (4.6, 8.15)-(5.4, 8.21)Picture1.Line (5.4, 8.21)-(6.2, 7.63)Picture1.Line (6.2, 7.63)-(7, 7.03)Picture1.Line (7, 7.03)-(7.8, 5.81)Picture1.Print 扭矩Picture1.Line (1.4, 6.8)-(2.2, 7.1)Picture1.Line (2.2, 7.1)-(2.98, 7.3)Picture1.Line (2.98, 7.3)-(3.8, 7.8)Picture1.Line (3.8, 7.8)-(4.6, 8.3)Picture1.Line (4.6, 8.3)-(5.4, 8.62)Picture1.Line (5.4, 8.62)-(6.2, 8.8)Picture1.Line (6.2, 8.8)-(7, 9)Picture1.Line (7, 9)-(7.8, 8.9)Picture1.Current X = 6.5Picture1.Current Y = 8.7Picture1.Print 功率Picture1.Line (1.4, 3.9)-(2.2, 3.37)Picture1.Line (2.2, 3.37)-(2.98, 3.15)Picture1.Line (2.98, 3.15)-(3.8, 2.96)Picture1.Line (3.8, 2.96)-(4.6, 2.83)Picture1.Line (4.6,2. 83)-(5.4,2.9)Picture1.Line (5.4,2.9)-(6.2, 2.93)Picture1.Line (6.2, 2.93)-(7, 2.98)Picture1.Line (7, 2.98)-(7.8, 2.9)Picture1.Current X=5.3Picture1.Current Y=2.7Picture1.Print 油耗率End Sub最后退出运行的程序如下所示：Private Sub Command2_Click() EndEnd Sub最后画出来的图如下所示：图3-1 用VB画出的发动机外特性曲线图接下开根据相同的原理来画发动机的部分速度特性曲线图。首先画出横竖坐标以及刻度线，再根据坐标的变换将给出的数据变化成反应到窗体上的坐标，再通过line的功能将各个点连起来形成发动机的部分速度特性曲线图。下面要画的是节气门开度在90%时发动机的部分特性曲线图的程序：Private Sub Command1_Click()Dim i As IntegerPicture1.FontSize = 8Picture1.AutoRedraw = TruePicture1.Scale (-1, 12)-(12, -1)Picture1.Line (0, 0)-(0, 10)Picture1.Line (0.1, 9.7)-(0, 10)Picture1.Line (-0.1, 9.7)-(0, 10)Picture1.CurrentX = -0.8Picture1.CurrentY = 10.5Picture1.Print 扭矩(N/m)For i = 1 To 10Picture1.Line (-0.2, i)-(0, i)CurrentY = CurrentY + 0.6Picture1.Print i * 20 + 150Next iPicture1.Line (8, 0)-(8, 5)Picture1.CurrentX = 8.8Picture1.CurrentY =4Picture1.Print 油耗率(g/kw.h)For i = 0 To 4Picture1.Line (8.2, i)-(8, i)CurrentY = CurrentY + 0.6CurrentX = CurrentX - 0.8Picture1.Print 80*iNext iPicture1.ForeColor = vbBlackPicture1.Line (8, 5)-(8, 10)Picture1.Line (8.1, 9.7)-(8, 10)Picture1.Line (7.9, 9.7)-(8, 10)Picture1.CurrentX = 8.8Picture1.CurrentY = 10Picture1.Print 功率(Kw)For i = 5 To 10Picture1.Line (8.2, i)-(8, i)CurrentY = CurrentY + 0.6CurrentX = CurrentX - 0.8Picture1.Print i * 20-100Next iPicture1.ForeColor = vbBlackPicture1.Line (0, 0)-(8, 0)Picture1.Line (7.7, -0.1)-(8, 0)Picture1.Line (7.7, 0.1)-(8, 0)Picture1.CurrentX = 8.5Picture1.CurrentY = -0.3Picture1.Print 转速(rpm)For i = 1 To 7Picture1.Line (i, -0.2)-(i, 0) CurrentY = CurrentY + 0.5Picture1.Print 800 + 300 * iNext iPicture1.DrawStyle = 4For i = 1 To 10Picture1.Line (0, i)-(8, i)Next iFor i = 1 To 7Picture1.Line (i, 0)-(i, 10)Next iPicture1.DrawStyle = 6Picture1.Line (1.4, 6.85)-(2.2, 7.02)Picture1.Line (2.2, 7.02)-(2.98, 7.03)Picture1.Line (2.98, 7.03)-(3.8, 7.04)Picture1.Line (3.8, 7.04)-(4.6, 7.8)Picture1.Line (4.6, 7.8)-(5.4, 8.03)Picture1.Line (5.4, 8.03)-(6.2, 7.24)Picture1.Line (6.2, 7.24)-(7, 6.72)Picture1.Line (7, 6.72)-(7.8, 5.42)Picture1.Print 扭矩Picture1.Line (1.4, 6.8)-(2.2, 7.1)Picture1.Line (2.2, 7.1)-(2.98, 7.4)Picture1.Line (2.98, 7.4)-(3.8, 7.7)Picture1.Line (3.8, 7.7)-(4.6, 8.2)Picture1.Line (4.6, 8.2)-(5.4, 8.6)Picture1.Line (5.4, 8.6)-(6.2, 8.7)Picture1.Line (6.2, 8.7)-(7, 8.9)Picture1.Line (7, 8.9)-(7.8, 8.8)Picture1.Current X = 6.5Picture1.Current Y = 8.7Picture1.Print 功率Picture1.Line (1.4, 3.07)-(2.2, 2.63)Picture1.Line (2.2, 2.63)-(2.98, 2.88)Picture1.Line (2.98, 2.88)-(3.8, 2.6)Picture1.Line (3.8, 2.6)-(4.6, 2.79)Picture1.Line (4.6,2. 79)-(5.4,3.04)Picture1.Line (5.4,3.04)-(6.2, 2.95)Picture1.Line (6.2, 2.95)-(7, 2.94)Picture1.Line (7, 2.94)-(7.8, 3.03)Picture1.Current X=5.3Picture1.Current Y=2.7Picture1.Print 油耗率End Sub由此得到的节气门开度为90%时发动机的部分速度特性曲线图如下所示： 图3-2 发动机部分速度特性曲线图 3.2发动机负荷特性曲线绘制过程及程序与画发动机速度特性曲线图的方法类似，首先在VB的窗体中调用两个命令控件和一个图画控件，将第一个命令控件命名为运行，第二命令控件命名为退出。以速度为2700转/分为例，首先对工作范围进行设置以及初始化：Private Sub Command1_Click()Dim i As IntegerPicture1.FontSize = 8Picture1.AutoRedraw = TruePicture1.Scale (-1, 12)-(12, -1)对工作范围进行确定后，运用line属性画坐标轴以及标注坐标轴所代表的参数，下列程序表明画的为竖坐标轴，并且在画完箭头后标注为油耗率： Picture1.Line (0, 0)-(0, 10)Picture1.Line (0.1, 9.7)-(0, 10)Picture1.Line (-0.1, 9.7)-(0, 10)Picture1.CurrentX = 1Picture1.CurrentY = 10Picture1.Print 油耗率(g/kw.h)在标注完成后通过循环变量i来标注刻度以及刻度值，程序如下所示：For i = 1 To 10Picture1.Line (-0.2, i)-(0, i)CurrentY = CurrentY + 0.6Picture1.Print i * 30 + 200Next i接下来画横坐标轴并且标注刻度及刻度值：Picture1.ForeColor = vbBlackPicture1.Line (0, 0)-(8, 0)Picture1.Line (7.7, -0.1)-(8, 0)Picture1.Line (7.7, 0.1)-(8, 0)For i = 1 To 8Picture1.Line (i, -0.2)-(i,