VB/VBA存储的端序
1、要想制造高性能的VB/VBA代码，离了指针是很难办到的。
2、因为VB/VBA里，用Long来表示指针，而32位(包括64位兼容的)计算机里4字节整数的处理，是最快的方式！
3、要想用指针来处理数据，那就得明白数据在内存里的结构(最近系列文章正在分享，欢迎关注)，更需要明白数据在内存中的存储顺序问题，这就是端序啦！
4、端序1词最早出于《格列佛游记》中小人国吃鸡蛋，他们不知道是从鸡蛋小头吃起，还是从大头吃起，进而引发了争论！后来，随着计算机的发展，也出现了同样的状况！
5、比如字符串"abc"，a在b的左边，c在b的右边。如果将其放入字节数组aByte中，则a为aByte(0)，b为aByte(1)，也即是说左边的存储到低地址，右边存储到高位置。这就是小端序。
6、再比如数字12345，左边的1比右边的2要大，也即是说低位置是高单位，高位置是低单位。这就是大端序。
例如，对于 int 型整数 0x01020304 来说，按照小端序存储，在内存中的顺序（从低到高）如下：
04 03 02 01
按照大端序存储，在内存中的顺序（从低到高）如下：
01 02 03 04
采用哪种字节序？
大端和小端有其各自的优势。大端存储的第一个字节是高位，对于一些数值判断（比如正负）会很迅速；小端存储的第一个字节是低位，符号位在最后一个字节，从低位开始计算，效率比较高。
0x为16进制数的前缀，意思就是当你看到0X,那么后面跟的数字就是16进制的数。上面 的例子为什么用16进制表示呢？
在计算机底层，内存地址通常以十六进制表示。使用十六进制可以更好地理解和识别内存地址、指针和寄存器等底层系统信息。关于这个本博有专门的一篇文章——>CSDN
7、很显然，在现实生活中，我们同时在使用大、小端序，而且都符合习惯。那在计算机里，能否这样呢？
8、答案是否定的，这跟计算机只认整数的原理是一样的，为了简化计算机设计，一种类型的计算机往往只默认一种端序，尤其是在存储领域。
9、我们常用的X86计算机，就是小端序的。这与我们平时大部分人的习惯顺序是一致的，也即“从小到大”和“从左至右”是主流。
10、但是理解大端序也非常有必要，比如汇编机器码中的地址，就需要端序转换。堆栈结构，也需要有类似的理解。
十进制转化为 r 进制，整数部分用除 r 取余法，小数部分用乘r取整法。
以下实例为4个字节长整型long数据从小端序转为大端序的vba代码：
Function LongToBigEndianBytes(ByVal value As Long) As Byte()
' 创建一个4字节的数组，用于存储结果的每个字节
Dim bytes(3) As Byte
' 将value的每个字节分别赋给数组，从大端序到小端序
bytes(0) = value And &HFF ' 最低字节
bytes(1) = (value And &HFF00) \ &H100 ' 次低字节
bytes(2) = (value And &HFF0000) \ &H100 ' 次高字节
bytes(3) = (value And &HFF000000) \ &H1000000 ' 最高字节
' 返回大端序字节数组
LongToBigEndianBytes = bytes
End Function
Sub TestLongToBigEndianBytes()
Dim littleEndianLong As Long
littleEndianLong = 1000 ' 原始数值
Dim mys
' 将小端序长整型数转换为大端序字节数组
Dim bigEndianBytes() As Byte
bigEndianBytes = LongToBigEndianBytes(littleEndianLong)
' 打印结果（这里打印的是字节的十六进制表示）
Dim i As Integer
For i = LBound(bigEndianBytes) To UBound(bigEndianBytes)
mys = mys & Right("00" & Hex(bigEndianBytes(i)), 2)
Next i
MsgBox "十进制数： " & littleEndianLong & " 对应的十六进制大端序是：" & vbCr & Space(15) & mys
End Sub
1000(十进制) = 3E8(十六进制)，补齐8字节后为00 00 03 E8 ,小端序转大端序为E8 03 00 00，如下图所示：
