如何用VB来控制PLC

sharpsword

请教各位高手,如何用VB来控制PLC,在VB中用什么办法去改写PLC中的存储单元?
1 x: ^/ j- X1 x8 t6 a  U! q* S/ B
[ 本帖最后由 bdblbyq 于 2007-9-5 21:53 编辑 ]

夏冷青果

很好的问题,哪位大虾说以下.

jin210

我想你没有源代码是没法知道存储单位的地址的呀!难

jgh37

关键是要知道plc的通讯协议，通过通讯口来控制plc的动作，但是有些plc的协议是不公开的。
* n0 I$ f. B# n% }1 s三菱的plc还可以通过rs指令来实现与通讯口的通讯。至于pc端的变程，那资料就多了。

hzf647

各种PLC的通讯协议不獤,接口不同,你的题目太大.GOOGEL上找吧,很多.

luxueyuan

我们做的一个试验设备，是用VC与PLC进行通讯的！

sharpsword

楼上的,有资料吗,能否发给我,sharpsword1976@sina.com

binzjg

基于VB的台达PLC与监控计算机的串行通信实现 8 x4 m2 K$ j5 ~3 W9 E1 Z. i3 o. V/ I 中达电通股份有限公司

----中达电通上海机电PLC产品处 王乃全 ) P! R6 G1 o. o6 m! s& F Implementation of Serial Communication Between Monitoring Computer and Delta PLC Based on Visual Basic ' ~2 X8 i" i! j) ?! X) G6 BWang Naiquan 摘要：PLC直接与现场控制层的检测仪器仪表设备连接，是底层控制网络的组成部分，是工厂自动化系统的基石，因此实现与监控层计算机的通信对系统的优化运行有重要意义。文章基于VB讨论台达DVP PLC与监控计算机的通信问题。 关键词：VB 通信协议 可编程控制器 Abstract: The PLC is a composing part of Infranet, it links to the measuring instrument and device in field control layer directly, and is the footstone of factory automation system. Therefore it is very important to realize the communication between PLC and monitoring layer computer for optimization of syste running. The paper discussed the related communication problems between Delta DVP PLC and monitoring computer based on Visual Basic. . [6 w& y3 P7 t9 J) P( W4 r- NKey Words: Visual Basic Communication protocal Programable logic controller [中图分类号] TP273 [文献标识码] B 文章编号 1 引 言 $ P5 h% s# J4 p3 X现场设备层中的设备种类繁多,有传感器、启动器、驱动器、I/O部件、变送器、阀门等等,当然也包括现场检测仪器仪表设备。PLC是现场设备控制层不可缺少的部分，已经非常普及，如何简便地实现与PLC的交互已经成为众多厂商新的竞争战场。由此产生了人机界面等软件产品，这些产品的出现简化了对PLC的控制、操作，使PLC的应用更加方便；但也有其共同的缺点，价格普遍偏高和可二开发性较差。VB作为“原始”的编程语言在这两方面无疑有着明显优势的，本文结合一个简单的案例，用比较基础的概念讨论如何通过VB实现PC与PLC之间的通信问题，这对刚涉步控制领域的工程师或许是有帮助的。在现场设备层中各式各样的设备都可以和计算机联机，而最简单的自动化联机方式就是使用串行通信，VB提供了串行通信控件可以让开发者开发出串行通信的系统程序，以下是对相关问题的粗略讨论。 ( j  _5 A* A, {+ M2 串行通信基本概念 数据通讯中有两种类型的通信形式，即并行通信（Parallel Communication）和串行通信（Serial Communication）。例如，如果有8位数据需要传送，那么并行通信一次就可以完成8位的传输量；而串行一次只能传送1位。图1表示了两种不同的通信模式，常用的串行通信也有两种，分别为RS-232和RS-485。 . [4 b  k0 X" ~: r8 L ( E3 p- t- f  w! l/ [: Qhttp://file:///C:/Documents%20and%20Settings/Owner/My%20Documents/中达电通股份有限应用方案：基于VB的台达PLC与监控计算机的串行通信实现.files/2006112715345834883.jpg http://file:///C:/Documents%20and%20Settings/Owner/My%20Documents/中达电通股份有限应用方案：基于VB的台达PLC与监控计算机的串行通信实现.files/2006112715354326144.jpg

binzjg

2．1 RS-232 串行通信
RS-232的信号准位是参考地线而言的，如图2所示。相对于参考接地端1传输端传送数据；接收端则相对于参考接地端2复现出传送端的传送的数据。
5 j' j4 i' X. }+ H7 t& }
http://file:///C:/Documents%20and%20Settings/Owner/My%20Documents/中达电通股份有限应用方案：基于VB的台达PLC与监控计算机的串行通信实现.files/2006112715363699181.jpg
6 V4 m) G( p& ~8 v# L图2 RS-232 串行通信示意图
由图2可知，由于两个接地端准位不一定一样，而且很容易受到干扰，所以信号在RS-232线路传输时，很容易产生错误。
2．2 RS-485串行通信
$ j8 \& z$ w$ eRS-485的信号传输方式如图3所示。
8 ^7 B* X' |8 F7 T, f
http://file:///C:/Documents%20and%20Settings/Owner/My%20Documents/中达电通股份有限应用方案：基于VB的台达PLC与监控计算机的串行通信实现.files/200611271537534224.jpg
& j3 W& J% \1 CRS-485的信号被传送出去时会分成正负两条线路，当到达接收端后，在将信号相减还原成原来的信号；如果将原始的信号表示成（DT），而被分成的信号分别标示成（D+）及（D-），则DT=(D+)-(D-)。同理，接收端在接收到信号后，也依据上式还原成原来的样子。如果线路受到干扰，两条线路的信号分别为（D+）+Noise与（D-）+Noise。接收端还原信号为(DT)= [（D+）+Noise]-[（D-）+Noise]，与先前结果一样，所以RS-485可以有效的防止噪声的干扰。
' |7 D& F6 k9 K. I3 VB的基本概念
VB（Visual Basic）是微软的窗口软件，提供了很多接口成员，对象、属性、事件、方法就是4个重要的接口，VB提供了许多常用的控件。
! g0 c# ]/ x  J% r3．1卷标控件
卷标控件如图4（a）所示，该控件专用于显示文字、数字用，显示如图4(b)所示

http://file:///C:/Documents%20and%20Settings/Owner/My%20Documents/中达电通股份有限应用方案：基于VB的台达PLC与监控计算机的串行通信实现.files/200611271538445760.jpg
3.2 按钮控件
按钮控件如图5（a）所示，该控件使用率很高，提供一个供系统用户操作用的按钮，如图5（b）所示。
$ @& e& z7 d5 j0 A: I! ]; B/ E7 l
5 H3 U8 ^2 ?$ Q" m. H3 Jhttp://file:///C:/Documents%20and%20Settings/Owner/My%20Documents/中达电通股份有限应用方案：基于VB的台达PLC与监控计算机的串行通信实现.files/2006112715384096034.jpg
3．3 定时器控件
' |2 [6 t1 E3 ]7 y1 F定时器控件如图6所示，该控件的最大作用在固定的时间内可执行所设置的程序代码一次。

8 M7 [2 q# |8 ~8 e! e) Nhttp://file:///C:/Documents%20and%20Settings/Owner/My%20Documents/中达电通股份有限应用方案：基于VB的台达PLC与监控计算机的串行通信实现.files/2006112715392053847.jpg
VB提供了大量的控件，在此不再多述。
! }) i+ |, o6 v/ ~& k4 基于MScomm控件的串行通信
3 z: B! R: h- ?/ Y5 ]1 Z要完成VB与PLC等设备的串行通信要用到MScomm控件， 在此有必要对该控件作较详细的说明。Mscomm是一个非标准控件，需要要手动添加许多项目，其步骤如下。
6 _. `, I% ~5 U# Z( E; U' B1） 选择菜单的【工程】
2） 选择【部件】
) t) v. p% y1 P6 v! }3） 在弹出的对话框中做如图7的选择。

http://file:///C:/Documents%20and%20Settings/Owner/My%20Documents/中达电通股份有限应用方案：基于VB的台达PLC与监控计算机的串行通信实现.files/200611271540090311.jpg
图7 对话框界面

4）如图8所示，在部件选项卡就会出现MScomm控件。

http://file:///C:/Documents%20and%20Settings/Owner/My%20Documents/中达电通股份有限应用方案：基于VB的台达PLC与监控计算机的串行通信实现.files/2006112715404076957.jpg
图8 MScomm控件
5）基本属性

+ [0 ?9 j2 e, T1 |; c5 ?1 G) hhttp://file:///C:/Documents%20and%20Settings/Owner/My%20Documents/中达电通股份有限应用方案：基于VB的台达PLC与监控计算机的串行通信实现.files/2006112715412022893.jpg

binzjg

4.1 MODBUS ASCII
Modbus 分为ASCII和RTU两种，ASCII采用的格式和校验相对简单，本文采用ASCII格式，并仅对使用的功能码进行说明，更多的信息，请参看协议的详细说明。
9 M7 f3 |1 U' D+ [0 S$ D1）通信格式

http://file:///C:/Documents%20and%20Settings/Owner/My%20Documents/中达电通股份有限应用方案：基于VB的台达PLC与监控计算机的串行通信实现.files/2006112715421216142.jpg
LRC算法：ADR H+CMD H+DATA H，然后取2的补码。
2）功能码
; E  @5 |3 E0 C5 V; g05，写入线圈

http://file:///C:/Documents%20and%20Settings/Owner/My%20Documents/中达电通股份有限应用方案：基于VB的台达PLC与监控计算机的串行通信实现.files/2006112715424046003.jpg
01，读线圈状态

http://file:///C:/Documents%20and%20Settings/Owner/My%20Documents/中达电通股份有限应用方案：基于VB的台达PLC与监控计算机的串行通信实现.files/2006112715431842087.jpg
4 p- I  X) q. I; c2 m* u
06，写入单个字寄存器
* e1 _( z9 r2 u9 L* T
http://file:///C:/Documents%20and%20Settings/Owner/My%20Documents/中达电通股份有限应用方案：基于VB的台达PLC与监控计算机的串行通信实现.files/2006112715501594856.jpg
) M% W7 k; D5 \8 B% b: x1 `4.2 VB与PLC通信的实现
1 r1 c4 o4 E: `! U, w5 a1 I以下举例说明现场设备与PLC通信的实现。
0 j& ]" p0 o6 E" H1）控制要求：控制PLC的起动、停止，并显示运行状态（绿色为运行，红色为停止）；能够用交替型按钮控制Y0,Y1，并用指示灯显示Y0,Y1状态（绿色为运行，红色为停止）；能够对D256，D512两个寄存器进行数值写入的操作。
0 j; N  Y/ ?  Z7 V/ [% S2）实现思路：PLC起动停止的标志位为M1072，查DVP协议，知道地址为H0C30，按功能码01操作； 同样Y0,Y1的地址分别为H0500，H0501。写入FF00为ON，0000为OFF，按功能码05操作；D256，D512地址分别为H1100，H1200，按功能码06操作即可。
3）VB接口的设计如图10所示。
7 O9 W% O( J; j$ d5 a
; b1 I  @' p# l% k# X4 R& jhttp://file:///C:/Documents%20and%20Settings/Owner/My%20Documents/中达电通股份有限应用方案：基于VB的台达PLC与监控计算机的串行通信实现.files/2006112715441355277.jpg
' z# z0 V0 ?% t' ?9 {/ |0 f! l图10 监控程序界面
用按钮控制PLC的起动停止，Y0、Y1的ON/OFF及D256、D512写完数据的发送；用Shape组件做指示灯，表示PLC的运行状态和Y的状态；用timer组件不停的读取M1072的状态，以判断PLC的运行情况；用MScomm控件实现PC与PLC的通信。

binzjg

4）编程实现的代码构成
/ K6 P1 W8 ^8 C% G+ c3 G（1） LRC算法校验的实现
( N: z5 ^; y( {# DPublic Function LRC(str As String) As String
c = 0
l = Len(str)
For c = c + 1 To l
c_data = Mid$(str, c, 2)
d_lrc = d_lrc + Val("&H" + c_data)
c = c + 1
9 E3 O; j/ q& o$ PNext c
If d_lrc > &HFF Then
* p* v3 F) V: L, s0 ]d_lrc = d_lrc Mod &H100
End If
3 n7 ?2 I4 |9 a- E' W3 g' j- u% Bh_lrc = Hex(&HFF - d_lrc + 1)
If Len(h_lrc) > 2 Then
h_lrc = Mid(h_lrc, Len(h_lrc) - 1, 2)
% P% Q8 N+ M( p7 p( b- JEnd If
LRC = h_lrc
End Function
* h2 ?$ o" x2 L9 S; k) k（2） 运行的开始就判断PLC的状态并设置标志位
'初次运行打开串口，并显示PLC运行状态
, E( ?8 `+ S5 q, z( g  IPrivate Sub Form_Load()
8 q9 ?6 Z& b9 uDim s1 As String
, I* W& ]- f; jDim s2 As String
7 t+ n. V. }7 c: @5 Z$ p4 RDim s22 As String
* `2 n, _% i+ N  O; CDim s3 As String
  W" x6 p/ T- O1 g- B8 F, lDim s4 As String
MSComm1.PortOpen = True
s2 = "01010C300001"
& z; |; W  `! P( l: @& z/ t- is22 = LRC(s2)
- Q, M2 `2 f3 _s1 = ":" + s2 + s22 + Chr$(13) + Chr$(10)
' J+ N* w5 ?! ^9 W7 ]  F2 m1 b, ^MSComm1.Output = s1
; Q; C3 k+ l2 B) V" Z4 L! g$ @) o  Js3 = MSComm1.Input
; M- W4 g0 N5 d* d1 C9 ]s4 = Mid$(s, 6, 8)
% _! M' h" N7 F0 y% {1 gIf s4 = "0C30FF00" Then
5 s* A# w7 a# Vplc = 1 'PLC为运行标志
Else
plc = 0 'PLC为停止标志
% Y* d0 z: s1 W4 S  _; AEnd If
, {+ ~1 B7 m+ e9 mEnd Sub
& D  s6 Q  B. |" p7 G* @' ]（3） 下面一段为用指示灯表示PLC的运行状态
" y; Q1 O9 b$ z! IPrivate Sub Timer5_Timer()
Dim s1 As String
0 f# o9 a# Y% c; r. ]% x& p# sDim s2 As String
Dim s22
* X0 A4 G. x, ~* m. _, UDim s3 As String
Dim s4 As String
- F( I9 E( `/ g, q( b' e" u8 Fs2 = "01010C300001"
' l0 t. l; _4 c+ a  o/ }4 j/ ~s22 = LRC(s2)
s1 = ":" + s2 + s22 + Chr$(13) + Chr$(10)
MSComm1.Output = s1
" a5 E& h) ^7 I) x9 y- ?) rs3 = MSComm1.Input
s4 = Mid$(s3, 8, 2)
" s) F2 l$ B/ t" ]  A' H% z3 s1 ^! m) ]If s4 = "31" Then
plc = 1 'PLC为运行标志
Else: If s4 = "30" Then plc = 0 'PLC为停止标志
End If
; X& ^" g/ c" l, i! H  p6 x+ wIf plc = 1 Then
Label2.Caption = "PLC正在运行......"
Shape1.FillColor = RGB(0, 255, 0) 'green
Else
Label2.Caption = "PLC已经停止"
Shape1.FillColor = RGB(255, 0, 0) 'red
' G4 C& n7 Q2 w/ ~/ e1 QEnd If
End Sub
（4） PLC的起动与停止
'起动PLC
2 \- g0 c, U7 Q2 J4 @! D: B3 yPrivate Sub start_Click()
Dim strout As String
Timer5.Enabled = False
str = "00050C30FF00" 'M1072 为PLC起动停止标志位。查地址表，M1072为OC30.FF00为置
ON,0000为置OFF。
- X# `  B  p/ C1 i'以上都是固定格式，要牢记。
LRCC = LRC(str) '计算 str的lrc校验码。
strout = ":" + str + LRCC + Chr$(13) + Chr$(10) '欲传送之数据。13为D，10为A
MSComm1.Output = strout
$ ^5 L+ ?* H# o6 }7 OTimer5.Enabled = True
0 s0 v( S, u# B4 X) [* C1 S, sEnd Sub
8 z8 t' ~5 J( B% |5 ['停止PLC
% ~6 |  c+ ~0 T% `0 x0 q4 FPrivate Sub stop_Click()
Dim strout As String
6 }: L6 k! ^6 e- _; cTimer5.Enabled = False
/ f4 i  @2 q0 Y7 @5 m! Bstr = "00050C300000"
LRCC = LRC(str)
* J  j: i7 \  _strout = ":" + str + LRCC + Chr$(13) + Chr$(10)
MSComm1.Output = strout
# H# W- d; D7 r3 v( {% n9 [4 pTimer5.Enabled = True
End Sub
6 m& \5 P. c& AY0、Y1的ON/OFF与PLC起动/停止的控制方式相同，指示灯的表示方式也相同。D256，D512数据写入的操作类似，限于篇幅其它代码就不再列出了。5 结束语
VB语言易于编程使用，为与串行设备的通信提供了很大的方便。台达PLC采用标准的目前广为流行的MODBUS协议，为实现PLC与监控计算机的通信提供了简化的平台。由于台达所有的机电产品都支持MODBUS协议，所以，掌握了VB与PLC通信过程，也就等于掌握了PC与台达所有机电产品的通信。

binzjg

不好意思，图片传不上

zhengyizhuan

我学过VB，也学过PLC，可没用VB来编过PLC，用VB编PLC有什么好处啊~！

frankljh

Hope you will upload all pictures after you solve technical problem with editor. See you here
3 G: S- T6 ?+ W* Z2 D" x! J5 Kagain

chengkui

关键在于地址是如何对应的,应如何确定,若能告之,不胜感激

shuyihang

偶只见过用VB和组态软件进行实时监控，但是用VB控制PLC好像是不行的，因为现在有很多PLC不支持高级语言编程的，就算是有好像也只有C语言能行吧？

liweiproe

很新鲜的话题，对我来说是这样，我在用三菱PLC FX2N呢，但还没想过用VB，有谁知道需要些什么准备吗，我在网上一GOGO就满天广告阿