vb CRC校验源码
于 2022-02-10 发布
文件大小:5.83 kB
0 74
下载积分: 2
下载次数: 1
代码说明:
"CRC算法函数 Public Function CRC(STR1 As String) As String Dim CRCREG As Long Dim MVAL As Long Dim R As Integer Dim T As Integer CRCREG = 65535 For R = 1 To Len(STR1) Step 2 MVAL = Val("&H" + Mid(STR1, R, 2)) CRCREG = CRCREG Xor MVAL CRCREG = C
下载说明:请别用迅雷下载,失败请重下,重下不扣分!
发表评论