VB calculates CRC16