最近在对德卡d3-u进行开发时，遇到的几个问题

在获取卡的序列号时，由于使用的vb6，没有无符号类型，所以需要用以下函数转换一下

Function tounsign(ByVal x As Long) As Double
tounsign = CDbl(“&H” & Left(Hex(x), 4)) * 65536 + CDbl(“&H” & Right(Hex(x), 4))
End Function

在vb.net 中无符号类型，要定义为ulong ，默认的示例是long

vb中如何将long型溢出后的负整形还原成无符号double型?