FX2N与VB通讯读寄存器值的问题-专业自动化论坛-中国工控网论坛

FX2N与VB通讯读寄存器值的问题点击：359 | 回复：4

精华：6帖
求助：1帖
帖子：48帖 | 93回
年度积分：2
历史总积分：343
注册：2004年2月21日

发表于：2012-03-05 08:25:38

楼主

Private Sub Command1_Click() ‘退出事件,功能是退出程序并结束所有事件
Dim devdat As String ‘定义变量
MSComm1.InBufferCount = 0 ‘清空接收缓冲区
MSComm1.OutBufferCount = 0 ‘清空发送缓冲区
devdat = "110F6026400" +ｃｈｒ(3) ‘根据编程口通讯协议发送M32的置位命令
MSComm1.Output =ｃｈｒ(2) + devdat + SumChk(devdat) ‘ 根据编程口通讯协议发送M0的置位命令,SumChk(devdat)调用校验和过程

End Sub
我有一段代码往PLC里发送数据正常了，以上代码是往PLC的D123中写数，但是我怎么读不出来呢？我写的读数据的代码是这样写的，
Private Sub Command4_Click()
Dim devdat As String ‘定义变量
Dim Instring As String
MSComm1.InBufferCount = 0 ‘清空接收缓冲区
MSComm1.OutBufferCount = 0 ‘清空发送缓冲区
devdat = "010F602" +ｃｈｒ(3) ‘根据编程口通讯协议发送M32的置位命令
MSComm1.Output =ｃｈｒ(2) + devdat + SumChk(devdat) ‘ 根据编程口通讯协议发送M0的置位命令,SumChk(devdat)调用校验和过程
Instring = MSComm1.Input
Text1.Text = Instring
End Sub
他的返回值是空的，请高手指点我的错误在哪啊？

－－>

转移QQ号：21993961 时间:2008-08-27 17:34

－－>

分享到：