请大侠帮我将C代码转换成VB.Net，谢谢！
INT8UCalculate_CRC8(INT8Ucrc,INT8Un)｛INT8Ui;crc=crc^n;for(i=0;i<8;i++){if(crc&0x01){c...
INT8U Calculate_CRC8(INT8U crc,INT8U n)
｛
INT8U i;
crc=crc^n;
for (i=0;i<8;i++)
{
if(crc & 0x01)
{
crc=(crc>>1)^0x8C;
}
else
{
crc>>=1;
}
}
return crc;
} 展开
｛
INT8U i;
crc=crc^n;
for (i=0;i<8;i++)
{
if(crc & 0x01)
{
crc=(crc>>1)^0x8C;
}
else
{
crc>>=1;
}
}
return crc;
} 展开
1个回答
展开全部
public function Calculate_CRC8(byval crc as uint16,byval n as uint16) as uint16
dim i as uint16
crc=crc xor n
for i=0 to 7
if crc and 1 then
crc=(crc>>1) xor &H8c
else
crc=crc>>1
end if
next
return crc
end function
dim i as uint16
crc=crc xor n
for i=0 to 7
if crc and 1 then
crc=(crc>>1) xor &H8c
else
crc=crc>>1
end if
next
return crc
end function
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
