S7-200与VB的实例

我需要用一些S7-200与VB方面的例子,希望各位高手能赐送.谢谢,我的油箱号:LOUXINGANG932@163.COM

问题补充:
谢各位的关心,我下载回去慢慢学习理解.

最佳答案

VB用MSCOMM控件和S7-200 PLC做自由口通信这种方式。
 我举个简单的例子:
 PLC程序:
 LD     SM0.1
 MOVB   9, SMB30
 MOVB   2, VB100

 LD     SM0.0
 MOVB   IB0, VB101
 MOVB   IB1, VB102

 LD     SM0.5
 EU
 XMT    VB100, 0   每秒将IW0上传一次。

 VB程序:
 第一步:添加MSComm控件
 在工具栏右键-部件-添加Microsoft Comm Control 6.0
 然后双击MSComm

 第二步:添加2个Text Box
 Text Box用来显示PLC发给电脑的数据
 Text Box1显示IB0
 Text Box2显示IB1

 第三步:写代码
 Option Explicit
 Dim p() As Byte
 Private Sub Form_Load()
 MSComm1.PortOpen = True    
 MSComm1.InputMode = 1          
 MSComm1.RThreshold = 2
 End Sub

 Private Sub MSComm1_OnComm()
 Select Case MSComm1.CommEvent
 Case comEvReceive
 p = MSComm1.Input
 Text1 = p(0)
 Text2 = p(1)
 End Select
 End Sub
 这是最简单的通讯,如果PLC发送的数据很多,有起始字符结束字符,那就要在程序里再判断
 如果VB在接收数据后,再发送数据给PLC,那还要做发送程序
 如果VB做主,PLC做从,那程序又复杂一点。

提问者对于答案的评价:
非常感谢

原创文章,作者:ximenziask,如若转载,请注明出处:https://www.zhaoplc.com/plc353687.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2021年7月5日 上午1:38
下一篇 2021年7月5日 上午1:38

相关推荐

发表回复

登录后才能评论