东北石油大学华瑞学院本科生毕业设计（论文） 结 论
联合站是油田油气集中处理的一个非常重要的部门，原油脱水是其主要任务，本文的主要目的是了解联合站输油岗工艺流程并对原油脱水过程和净化油外输进行监测和控制。为了提高控制软件的可控性，通过深入了解工艺流程，结合大庆现场技术要求来设计合理的控制方案。
本实验使用组态王6.51绘制工艺流程图，VB6.0编写程序和设计软件界面，通过利用中泰研创PCI-8326A卡和PCI-8327卡作为输入输出设备来完成联合站输油岗自控系统设计，通过实际操作和软件运行我已基本完成了设计的基本要求。
通过这次毕业设计使我对自动化专业有了进一步了解，并对所学过的知识在工程设计过程上的应用有了进一步的了解，并且掌握了一定的实际知识，可以将课本上的理论知识与实际生产结合起来。从而更深刻的认识到在学习过程中主要掌握的是理论知识，在设计过程中觉得只有理论是不够的，只有理论与实践相结合，才会使设计更完整。
总之，毕业设计使我受益非浅，虽然我完成得还不够完善，但我学到的知识和得到的锻炼使我受益终生。
27
东北石油大学华瑞学院本科生毕业设计（论文） 参考文献
[1] 毛宝瑚，郑金吾．油田自动化[M]． 山东东营：石油大学出版社，2001：89-101． [2] 孙洪程．过程控制工程设计[M]．北京：化学工业出版社，2005：68-88． [3] 王毅，过程控制装备技术及应用[M]．北京：化学工业出版社，2003：10-80． [4] 向德明，姚杰．现代化工检测及过程控制[M] ．黑龙江哈尔滨：哈尔滨工程
大学出版社，2002：20-60．
[5] 吴勤勤．控制仪表及装置[M]．北京：化学工业出版社，2004：52-66． [6] 周陆．油气集输[M] ．北京：石油工业出版社，1997：104-106．
[7] 张天春，自动检测技术[M]，第2版第1次印刷，大庆，大庆石油学院出版社，
1998年，1-65
[8] 董德发，刘祥楼，邵克勇．自动控制工程设计基础[M] ．黑龙江大庆：大庆
石油学院，2007：200-252．
[9] 刘彬彬，高春艳，王茜．Visual Basic程序设计自学手册[M] ．北京：人民邮
电出版社，2008．3．
[10] CurtisD.Johnson，Process Control Instrumentation Technology[M]，Jonn
Wiley&Son，Inc.,UA，2002：63-163．.
[11] Nagrath TJ，Control System Engineering[M]，New Yerk:Halsted press，A
Division of Joho Wiley&Son，Inc.,2008：12-136．
28
东北石油大学华瑞学院本科生毕业设计（论文） 致 谢
本次设计使我学到了不少的知识，掌握了许多课本上学不到的知识，拓宽了我的视野，丰富了我的专业知识，有了更大的进步，同时也学会了不少做人的道理。在提高了学习效率和正确的学习方法的同时，使我在理论知识和实践能力上都得到了很大的提高，真正领会了理论联系实际的道理。也毕业论文终于画上了句号，两个多月的毕业设计即将完成，四年的大学生活也即将结束，此时此刻，首先，我要感谢带领我做毕业设计张天春老师，自始至终，他都给予了我精心的指导和无私的帮助，他对于科学严谨求实、一丝不苟的精神使我端正了学习态度，从而学到了不少东西，在这里我要对他表示深深的谢意。其次，我要感谢这四年来教过我的老师，从基础课到专业基础课，从专业基础课到专业课，每位老师都诲人不倦、兢兢业业，是他们，一步步的帮助我构建起了专业知识框架，使我从一个蒙昧无知的门外汉成为了一个合格的专业人才。他们不但给我知识，更教我做人。使我在这四年里茁壮成长。最后，感谢父母的养育之恩。感谢父母和家人对我的支持，使我顺利的完成了学业。在我多年的求学年涯中，他们无私的关爱是我坚强的后盾，他们的殷切的希望是鞭策我前进的动力，我终将以我毕生的勤奋和努力回报他们，让你们幸福是我一生的追求。
谢谢你们！
29
东北石油大学华瑞学院本科生毕业设计（论文） 附 录1
主程序
Option Explicit
Public Sj1 As Single Public Sj2 As Single Public Md(3) As Single Public V(3) As Single Public MF(3) As Single Public Cw(3) As Single Public Mn(3) As Single Public Mnz(3) As Single Public MFzs As Single Public Const Fa = 0.9987 '定义查询记录变量 Public MF1(3) As Single 'Public Mf2(3) As Single 'Public Mf3(3) As Single '定义索引字段
Public LL1 As String Public LL2 As String Public LL3 As String
' 定义PID算法所用参数 Public t As Single ' 时间常数
'定义比例度、积分时间、微分时间、采样周期
Public Kp As Single, Ti As Single, Td As Single, dt As Single Public r As Single
Public e1 As Single, e0 As Single Public u1 As Single, u0 As Single Public x1 As Single, x0 As Single Public Y As Single Public Sy As Boolean
Public Function MFz(ByVal x1 As Integer, ByVal Y As String) As Single Dim c As Single
Form4.Data1.Recordset.Index = \台位号\
30
东北石油大学华瑞学院本科生毕业设计（论文） Form4.Data1.Recordset.Seek \If Form4.Data1.Recordset.NoMatch Then
MsgBox (\对不起，不能发现要查找的系数MF\Else
Form4.Text1.DataField = Y End If
MFz = Val(Form4.Text1.Text) End Function
Public Sub PID(ByVal sr As Single, ByVal i As Integer) ' 被控对象1/(Ts+1) Ti = Val(Form7.Text4(0)) dt = 0.1 t = 1 e0 = 0 u0 = 0 Y = 0 x0 = 0 Sy = True
Do While Sy = True e1 = sr - Y
u1 = Kp * (e1 - e0) + (Kp * dt / Ti) * e1 + u0 x1 = Exp(-dt / t) * x0 + (1 - Exp(-dt / t)) * u1 Y = x1 e0 = e1 u0 = u1 x0 = x1
Form7.Text1(i) = Str$(Y)
Form7.Shape1(2 * i).Height = (100 - Form7.Text1(i)) * 2295 / 100 If Abs(Y - sr) < 0.5 Then Exit Sub End If Loop
End Sub
31