Does anybody has the CRC16 routine written in Visual Basic ?

Any help appreciated

Thanks