The following sample demonstrates how to use the FastCRC Type Library to calculate the
CRC16
checksum for a file.
Visual Basic Example
Private Sub MyButton_Click()
Dim checksum As Long
'Calculate the checksum
If FCRC16_CalculateFile(checksum, "C:\Test.txt") = 0 Then
'Show the hexadecimal representation of the checksum
MsgBox FCRC_LongToHex16(checksum, True)
End If