为什么我的 Short 在 VB.net 中包含 4 个字节
Why does my Short containing 4 bytes in VB.net
根据 MSDN,Short
数据类型由两个字节组成:https://msdn.microsoft.com/en-us/library/47zceaw7.aspx
但是如果我定义一个Short
变量,内容总是4个字节:&HFFFFFFFF
Dim crc As Short = CShort(&HFFFFS) ' crc = &HFFFFFFFF
Dim crc As Short = &HFFFFS ' crc = &HFFFFFFFF
这个语句甚至给我一个错误:
Dim crc As Short = CShort(&HFFFF) ' Error: Constant expression not representable in type 'Short'
这是怎么回事?为什么我的 Short
不占用两个字节?
MWE 添加:
Public Function CRC16(ByVal dataFrame As Byte(), ByVal dataLength As Int16) As Int16
Dim index As Int16
Dim crc As Short = &HFFFFS
For iCount As Int16 = 0 To CShort(dataLength - 1)
index = (crc >> 8) Xor dataFrame(iCount)
crc = CShort(&HFFFF And ((crc << 8) Xor CRC_Table(index)))
Next
Return crc
End Function
因为一个Short
是有符号的,所以最高位保留给符号。因此,您可以在 signed short 中存储的最高值为 &H7FFF
或 Int16.MaxValue
如果你想利用所有 16 位,那么你需要使用 Unsigned Short (UInt16
)
所以这失败了:
Dim crc As Short = CShort(&HFFFF)
但这行得通:
Dim crc As UShort = CUShort(&HFFFF)
根据 MSDN,Short
数据类型由两个字节组成:https://msdn.microsoft.com/en-us/library/47zceaw7.aspx
但是如果我定义一个Short
变量,内容总是4个字节:&HFFFFFFFF
Dim crc As Short = CShort(&HFFFFS) ' crc = &HFFFFFFFF
Dim crc As Short = &HFFFFS ' crc = &HFFFFFFFF
这个语句甚至给我一个错误:
Dim crc As Short = CShort(&HFFFF) ' Error: Constant expression not representable in type 'Short'
这是怎么回事?为什么我的 Short
不占用两个字节?
MWE 添加:
Public Function CRC16(ByVal dataFrame As Byte(), ByVal dataLength As Int16) As Int16
Dim index As Int16
Dim crc As Short = &HFFFFS
For iCount As Int16 = 0 To CShort(dataLength - 1)
index = (crc >> 8) Xor dataFrame(iCount)
crc = CShort(&HFFFF And ((crc << 8) Xor CRC_Table(index)))
Next
Return crc
End Function
因为一个Short
是有符号的,所以最高位保留给符号。因此,您可以在 signed short 中存储的最高值为 &H7FFF
或 Int16.MaxValue
如果你想利用所有 16 位,那么你需要使用 Unsigned Short (UInt16
)
所以这失败了:
Dim crc As Short = CShort(&HFFFF)
但这行得通:
Dim crc As UShort = CUShort(&HFFFF)