第5期 2012年9月
中氮肥
M-Sized Nitrogenous Fertilizer Progress
VB菜单程序在DCS画面操作上的应用
李广林
（黑龙江北大荒农业股份有限公司浩良河化肥分公司，黑龙江伊春153103）
【中图分类号】TQ056.2*2
0引言
No.5 Sept.2012
［文献标识码】B【文章编号】1004-9932(2012)05004802
2条主干网均采用完余配置，由网络接口模件（以下简称NIM）联接，由NIM完成LCN与
我公司空分车间5"空分装置采用的是美国
HONEYWELL公司的TPS集散系统，人机界面使用鼠标和操作员键盘对现场的工况进行控制画面流程图和逻辑图的切换通过操作员键盘来实现。
传统的DCS画面流程图和逻辑图的转换都是通过操作员键盘来切换，但操作员键盘长期使用后，其标示牌会因磨损而变得模糊不清。基于 TPS系统的使用平台是Windows2000操作系统，笔者使用VB编写了菜单程序应用于该系统操作，只要在每幅流程图和逻辑画面上加入一个按钮调用菜单程序，就可十分方便地象用鼠标点击雅p 面，更加方便了工艺运行人员对现场工艺的监控。
1TPS控制系统结构
TPS控制系统结构见图1。
PRTI GUSo2
GUSo
NIM21/22
PRT2 GUSO3
HM
LCNA LCNB
JHPM1/2
UCNAUCNB
图1TPS控制系统结构
TPS系统由局域控制网（以下简称LCN）和方能控制网（以下简称UCN）2条网络组成
[收稿日期】2012-01-29
【作者简介】李广林（1975—），男，黑龙江海伦人，工程师。
万方数据
UCN之间数据的传输和通讯协议的转换。在 LCN网上联接了3台GUS操作站，均采用DELL
台式电脑。 2程序设计 2.1
莱单项的设定
以流程图/stwator和逻辑图1/uz1001为例。打开VB6.0编程软件，创建一个新的工程。在窗口打开菜单编辑器，在标题中输人第一个菜单项（单元）的名称（汽轮机系统），在名称中输人第一个菜单项的英文名（MnuQLJ），点击下一步。为区别菜单项和菜单项中各子项目，在输人子项目之前用鼠标先点击一下向右箭头，然后输入菜单中各子项的标题/名称，分别是蒸汽输水系统/stwator和逻辑图1/uz1001。第一→个菜单项完成以后，再输人第二项，第三项...，以此类推。
设好各菜单项和子项目后，在窗口中点击鼠标右键，调出属性窗口，给菜单设定标题（空分装置18000m/h画面显示窗口）、背景色、
前景色、菜单高度、宽度和控制方式等。 2.2工程代码的编写
在工程窗口中用鼠标左键选中所创建的工程，点击鼠标右键，选择添加，选中添加模块，打开一个工程模块代码窗口后，在窗体中写人如下程序：
Declare Function SetWindowPos Lib " user32"(ByVal hwnd As Long, ByVal hWndnsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Declare Function FindWindow Lib "user32"