000Ch=12(10进制) //命令中的操作数部分总是以10进制形式发出,PLC返回的却是16进制呵!
试将"00rr00120001"交给以下字串处理函数:
========================================
CommStr = OmronChr$("00rr00120001")
'OMROM PLC 命令字串变换函数
Private Function OmronChr$(s$)
Dim i&
Dim j%
s = UCase(s) '字符大写转换
s = "@" & s '加前导引符"@"
For i = 1 To Len(s) '逐个命令字符作异或运算
j = j Xor Asc(Mid(s, i, 1))
Next
'后部加异或校验(FCS)、和结束码"*" 和CR码Chr(13)
OmronChr = s & Right("0" & Hex(j), 2) & "*" & Chr(13)
End Function
你在南海吗?我在高明.