本人用VC编写PLC与  PC的串口通讯程序，想要向DM数据区写入数据， 关于FCS校验码这段程序用Vc或
VB如何编写，谢谢解答
    本人qq:150366088

Function fcs(a$)
b = 0
L = Len(a$)
For i = 1 To L
b = b Xor Asc(Mid(a$, i, 1))
Next i
ff$ = Hex$(b)
If Len(ff$) = 1 Then
ff$ = "0" + ff$
End If
fcs = ff$
End Function

这为大哥能不能详细点啊。我也在做这个啊。兄弟您如果做好的话，能不能发一份给我啊？第一次做这个没经验，特别是FCS校验，不会编啊！