汽车理论实验报告.doc

汽车理论实验报告.doc交通与汽车工程学院
实验报告
课程名称: 汽车理论
课程代码:
年级/专业/班:2010级热动（汽发）1班 学生姓名:
学 号:
实验总成绩:
任课教师: 徐延海
开课学院： 交通与汽车工程学院
西华大学实验报告
开课学院及实验室： 实验时间： 年 月曰
学生姓名
学号
实验成绩
课程名称
课程代码
实验项目名称
项目代码
指导教师
项目学分
1、 实验目的
2、 实验环境与工具
3、 实验内容
（设计性、创新性实验需写该项内容）
2实验原理及实验步骤（实验工作原理或实验的主要操作过程）
3实验记录（核心代码及调试过程）
注解：理工科实验需记录实验过程中的数据、图表、计算、现象观察等，实验过程中出现的问题；
其它如在计算机上进行的编程、仿真性或模拟性实验需记录程序核心代码以及程序在调式过程中出现 的问题及解决方法；记录程序执行的结果。
4、 实验总结
1实验结果分析及问题讨论
2实验总结心得体会
4. 3附录
注解：实验总结的内容根据不同学科和类型实验要求不一样，一般理工科类的实验需要对实验结果进行分 析，并且对实验过程中问题进行讨论；在计算机上进行的编程、仿真性或模拟性实验需要对上机实践结果 进行分析，上机的心得体会及改进意见。其它实验应总结实验过程写出心得体会及改进意见。
，程序调试过程中出现的问题及调试方法
Dim
n,
X, c
Dim
Tq,
ig,
6
Dim
f,
G
Dim
m,
i, CdA, r
Dim
i0,
Ua,
Iw, ifO
Dim
qt
,a
Dim
Ft,
Ff,
Fi
Dim
Fx,
Fw,
Fj
Private
Sub
Command1
Option Explicit
Picturel. Cis
Click()'驱动力与阻力平衡图
Picturel. Scale (TO, 15000)-(130, -700)
Picturel. Line
(-&
0)-(150, 0) : Picturel. Line (0, 15000)-(0, -500)'画坐标轴
Picturel. Line
(126,
-200)-(130, 0)
'画横轴箭头
Picturel. Line
(126,
200)-(130, 0)
Picturel. Line
(-2,
14700)-(0, 15000)
'画纵轴箭头
Picturel. Line
(2, 14700)-(0, 15000)
For i = 1 To 12 '画横坐标刻度线和刻度
200)
Picturel. Line (10 * i, 0)-(10 * i,
Picturel. CurrentX = 10 * i - 2: Picturel. CurrentY = -50: Picturel. Print 10 * i
Next i
For i = 1 To 14 '画纵坐标刻度线和刻度
Picturel. Line (0, 1000 * i)-(2, 1000 * i)
Picturel. CurrentX 二-8: Picturel. CurrentY 二 1000 * i + 400: Picturel. Print 1 * i
Next i
Picturel. CurrentX = -5: Picturel. CurrentY = 一50: Picturel. Print 0
Picturel. CurrentX 二 115: Picturel. CurrentY 二 700: Picturel. Print 〃Ua(km/h)
Picturel. CurrentX = 5: Picturel. CurrentY = 14600: Picturel. Print "F(kN)〃
Picturel. CurrentX 二 5: Picturel. CurrentY 二 1000: Picturel. Print 〃Ff〃
Picturel. CurrentX 二 120: Picturel. CurrentY = 3000: Picturel. Print "Ff+Fw〃
Dim ig(4) As Single
ig(0) = Vai(Textl8)
ig(l)二 Vai(Textl9)
ig(2) = Vai(Text20)
ig(3)二 Val(Text21)
ig(4) = Vai(Text22) f 二 V