毕业设计论文-vb在plc控制的矿井排水控制系统研究

毕业设计论文-vb在plc控制的矿井排水控制系统研究内容摘要：

False 表 33 frcLogin 表单的控件 3． 3． 2 主要功能设计 大家经常会在电影、电视节目的结尾看到不停上卷的字幕。 现在通过 Visual Basic 实现这个效果。 要使文字在窗口上移动，可用文本控件 Label 或 TextBox在容器控件上每隔一段时间，按一定方向移动一次移动，以造成文字移动的假象。 (1) 在 Form_Load 事件中应有如下说明： = 40000 39。 设置 Label 的初始位置 iStep = \ 200 = True 39。 开启时钟 = 150 Introd = True (2)接着在 Timer1 控件的 Timer 事件中添加如下动态显示的代码： If Introd Then = iStep If Then = 39。 循环显示字幕 End If End If 同时窗体上方和下方分别设置了菜单画面转换按钮，由于篇幅所限这里不再赘述，相应的代码请详见附录部分。 3． 4 工作流程窗体 (frdLogin) 利用 VB 方便的画图功能，可以很容易绘出漂亮的画面。 矿井主排水系统的生产流程如图 36 所示。 画面层次分明，结构合理，安排规范，在窗体左下部分直观形象展示生产实际过程和系统运行状态；同时兼顾工程器件运行时能直观、形象、实时反映工作状态，在各台水泵和电动阀处分别设置了 Shape 控件进行闪烁显示；右下端则是“手动”、“自动”和具有串口选择的框架；在其上端则显示各台水泵故障情况和通信报警情况；并通过左上部分各水泵和电动阀控制按钮方便切换设备以便检修。 整幅画面考虑了人们的视觉习惯，以及工程界面约定成俗的习惯，使用者可以一目了然，操作方便、快捷，达到很好工程要求。 同主窗体一样，在窗体上端和下端分别置有菜单栏 和界面转换按钮，用户可以根据自己习惯选择相应操作。 图 36 frdLogin 窗体 3． 4． 1 界面设计 在所有窗体中工作流程窗体最复杂，所用的控件也最多，但是经过严格组织、合理安排，界面明朗层次分明、安排规范，该窗体上控件及其属性设置如表 351所示。 Form Name FrdLogin BorderStyle 1— Fixed Single Caption 流程显示 KeyPreview False ShowInTaskbar True StartUpPosition 0— 手动 WindowState 0— Normal CommandButter Name Command1 Caption 工程概况 CommandButter Name Command2 Caption 流程显示 CommandButter Name Command3 Caption 水位显示 CommandButter Name Command4 Caption 表盘显示 CommandButter Name Command5 Caption 退 出 CommandButter Name beng1 Caption 泵 1停止 CommandButter Name beng2 Caption 泵 2停止 CommandButter Name beng3 Caption 泵 3停止 CommandButter Name beng4 Caption 泵 4停止 CommandButter Name beng5 Caption 泵 5停止 CommandButter Name fa1 Caption 阀 1停止 CommandButter Name fa2 Caption 阀 2停止 CommandButter Name fa3 Caption 阀 3停止 CommandButter Name cmdRun Caption PLC 停止 CommandButter Name Command14 Caption 手动 CommandButter Name Command15 Caption 自动 CommandButter Name Command16 Caption 确定 CommandButter Name Command17 Caption 取消 Frame Name Frame1 Caption 选择串行口 Label Name Label1 Caption 报警 Label Name Label2 Caption 水泵 1 Label Name Label3 Caption 水泵 2 Label Name Label4 Caption 水泵 3 Label Name Label5 Caption 水泵 4 Label Name Label6 Caption 水泵 5 Label Name Label7 Caption 通信 MSComm Name MSComm1 Handshaking 0— None InbufferSize 1024 InputLen 16 Settings 9600,n,8,1 Option Name Option1 Caption 串口 1 Option Name Option2 Caption 串口 2 Shape Name Shape1 BackColor amp。 H80000005amp。 BorderColor amp。 H00000000amp。 BorderStyle 1— Solid FillColor amp。 H00FFFFFFamp。 FillStyle 0— Solid Shape 3— Circle Shape Name Shape2 BackColor amp。 H80000005amp。 BorderColor amp。 H00000000amp。 BorderStyle 1— Solid FillColor amp。 H00FFFFFFamp。 FillStyle 0— Solid Shape 3— Circle Shape Name Shape3 BackColor amp。 H80000005amp。 BorderColor amp。 H00000000amp。 BorderStyle 1— Solid FillColor amp。 H00FFFFFFamp。 FillStyle 0— Solid Shape 3— Circle Shape Name Shape4 BackColor amp。 H80000005amp。 BorderColor amp。 H00000000amp。 BorderStyle 1— Solid FillColor amp。 H00FFFFFFamp。 FillStyle 0— Solid Shape 3— Circle Shape Name Shape5 BackColor amp。 H80000005amp。 BorderColor amp。 H00000000amp。 BorderStyle 1— Solid FillColor amp。 H00FFFFFFamp。 FillStyle 0— Solid Shape 3— Circle Shape Name Shape6 BackColor amp。 H80000005amp。 BackStyle 0— Transparent BorderColor amp。 H00000000amp。 FillColor amp。 H00FFFFFFamp。 FillStyle 0— Solid Shape 3— Circle Shape Name Shape7 BackColor amp。 H80000005amp。 BorderColor amp。 H00FFFFFFamp。 BorderStyle 1— Solid FillColor amp。 H00FFFFFFamp。 FillStyle 0— Solid Shape 2— Oval Shape Name Shape8 BackColor amp。 H80000005amp。 BorderColor amp。 H00FFFFFFamp。 BorderStyle 1— Solid FillColor amp。 H00FFFFFFamp。 FillStyle 0— Solid Shape 2— Oval Shape Name Shape9 BackColor amp。 H80000005amp。 BorderColor amp。 H00FFFFFFamp。 BorderStyle 1— Solid FillColor amp。 H00FFFFFFamp。 FillStyle 0— Solid Shape 2— Oval Shape Name Shape10 BackColor amp。 H80000005amp。 BorderColor amp。 H00FFFFFFamp。 BorderStyle 1— Solid FillColor amp。 H00FFFFFFamp。 FillStyle 0— Solid Shape 2— Oval Shape Name Shape11 BackColor amp。 H80000005amp。 BorderColor amp。 H00FFFFFFamp。 BorderStyle 1— Solid FillColor amp。 H00FFFFFFamp。 FillStyle 0— Solid Shape 2— Oval Shape Name Shape12 BackColor amp。 H80000005amp。 BorderColor amp。 H00FFFFFFamp。 BorderStyle 1— Solid FillColor amp。 H00FFFFFFamp。 FillStyle 0— Solid Shape 0— Rectangle Shape Name Shape13 BackColor amp。 H80000005amp。 BorderColor amp。 H00FFFFFFamp。 BorderStyle 1— Solid FillColor amp。 H00FFFFFFamp。 FillStyle 0— Solid Shape 0— Rectangle Shape Name Shape14 BackColor amp。 H80000005amp。 BorderColor amp。 H00FFFFFFamp。 BorderStyle 1— Solid FillColor amp。 H00FFFFFFamp。 FillStyle 0— Solid Shape 0— Rectangle Timer1 Interval 800 Enabled True Text Name Text1 Text 为空 Visible False Text Name Text2 Text 为空 Visible False 表 34 frdLogin 表单的控件 3． 4． 2 主要功能设计 综合岱山煤矿主排水系统实际情况，在设计是需要做到以下几个方面： (1) 在实施远程控制时采用一对一的控制开关和按钮，并且必须按照“手动”、“选择串口”、“确定”、“以及“ PLC 起 /停”、“水泵和电动阀起 /停”的顺序先后操作。 同时，当运行人员疏忽大意或手误按错按钮时，系统会自动给出要运行此过程的先决条件，使系统具有很好的防误操作功能。 当某台水泵或通信发生故障时，右边立即给出了这台水泵或通信报警情况，运行人员能够即及时知道事故的部位，并迅速通知检修人员检修和维护。 一旦系统发生严重事故，运行人员还可以通过 “ PLC 运行 /停止”控制按钮立即停止 PLC 运行，避免重大事故发生。 系统功能流程图如图 37 所示： 图 37 系统流程图 当需要停止设备的运行时，如果运行人员在还有水泵或电动阀工作时，先停止 PLC 或者关闭通信口，必然会给系统带来错误，甚至导致系统出错。 为了避免人为操作带来的故障，系统要求按照启动过程的逆过程操作，同启动过程一样，违规操作时系统将会出现警告并且要求重新操作。 鉴于以上几个方面，因此工程生产安全系数大大提高，符合工程生产要求。 (2) 由于设备较多，需要实现功能比较复杂，代码也就比较长。 因此，在此不可能将代码罗列出来，下面是一些典型代码和主要注释，相信不会给读者带来理解性的困难，详细的程序请参考附录部分，典型代码如下： 39。 运行 /停止 plc Dim RSStr As String Dim dat As String Dim WTim As Single 39。 状态改变，警告提示 If MsgBox(改变运行可能造成危险。