convert small code of c and delphi to vb net 2010

i have 2 code snippets attached, first in c, second in delphi they both doing the same thing, i need somebody to port it out to ms vb.net 2010 this is fcs16 crc calculation program in the end i need to get two correct crc bytes from the given data in the beginning, for example if given data is one hex byte "FC" the correct output crc must be 2 bytes "9B CD" thanks