基于VB60实现西门子PLC与PC间的TCP通讯.pdf

基于VB6.0实现西门子PLC与PC间的

TCP通讯

摘要摘要

摘要：主要介绍在MicrosoftVisualBasic6.0开发环境下，通过

Winsock1控件，用以太网的方式实现PCPC机与西门子1200/1500PLC系统之间数据

通信的方法，并把该通信方法用在环卫压缩设备控制系统中。

关键词:PLC,VB,通信

RealizationofTCPCommunicationbetweenSiemensPLCandPCBased

onVB6.0

Abstact：Thispaperintroducesdatacommunicationmethodbetween

PCapplications,whichtakeVisualBasic6.0astheirprogramming

languageandSIMATICS7-1200orS7-1500PLC.

Keywords:PLC,VB,communication.

众所周知，工业自动化监控系统一般是采用组态软件或高级语言开发，而采

用组态软件开发是需要买软件授权才能交付，虽然开发速度快，但成本较高而且

后期功能扩展不够灵活，也无法开发更加复杂的业务，如实现信息化和工业化的

有机融合，因此如何帮助开发者降低开发成本、提高工作效率，快速开发出对行

业有显著帮助和价值的自动化监控系统是本文所涉及的话题。

该控制系统由西门子S7-1200PLC、PC机等构成，其中PLC由以下组成：

1214CPU模块（带以太网口），数字量输入/输出模块，模拟量输入模块。

1监控系统的通信参数

系统运行时需要在PC与PLC之间通信的参数主要有如下：PC→PLC：压缩设

备电机启动和停止指令、压缩指令；PLC→PC：压缩设备液压系统压力、温度和

液位值，接近开关信号以及拉线位移传感器值。

2监控系统软件程序设计

VB通信程序

DimStart,Stop,CompressAsByte

DimPalue,Temperature,Level,

DisplacementAsSingle

DimLimit(5)AsByte

_______________________________

PrivateSubconnect_Click()

Winsock1.Close‘关闭连接

Winsock1.RemoteHost=192.168.2.5‘与PLC的IP地址

Winsock1.RemotePort=2000‘与PLC端口号

Winsock1.connect‘关建立连接

EndSub

_______________________________

PrivateSubForm_Load()

Winsock1.Close‘关闭连接

EndSub

PrivateSubClose_Click()

Winsock1.Close‘关闭连接

EndSub

_______________________________

PrivateSubWinsock1_ConnectionRequest(ByValrequestIDAsLong)

IfWinsock1.statesckClosedThen

Winsock1.Close

Winsock1.AcceptrequestID接受具有requestID参数的连接。

EndIf

EndSub

_______________________________

PrivateSubWinsock1_DataArrival(ByValbytesTotalAsLong)

Dimrec()AsByte

Winsock1.GetDatarec(),vbByte

DimiAsInteger‘限位’