关于modbus Rtu 的checksum解决方法

关于modbus Rtu 的checksum
厂方提供的说明书上的例子：0x02,0x00,0x01,0x13的checksum是0xEA.
请问：
   1、这checksnum是如何计算出来的？
   2、如果我要向下位机发送：02 00 03 08 39 54 45 58 54 30 31 0d  09 03，checksnum应是多少？
[解决办法]
你结贴吧,你要自己动手,VB我也没学过,网上都可以找到VB数据类型定义的写法
Dim NAME As Byte