采用VB编写,用于校验CRC16循环冗余码