在vb中进行crc校验,程序未经过测试,估计可能有点问题,仅供参考(CRC check, in vb procedure not tested, estimates that might be a little problem, only for reference)