返回内存地址——vba代码实现

在我们写代码声明一个变量时，电脑内存会为此变量分配一个内存空间，该内存空间的地址可通过以下代码得出：

Sub 返回内存地址()

'yngqq443440204 @ 2024年4月15日15:15:53
    Dim x As Integer, y As Integer
    Dim ptr1 As LongPtr ' 在64位Office中vba7，应使用LongPtr代替vba6中Long
    Dim ptr2 As LongPtr
    x = 1234
    y = 1235
    ptr1 = VarPtr(x)
    ptr2 = VarPtr(y)
    MsgBox "x的十六位内存地址是: " & Hex(ptr1) & vbCr & "y的十六位内存地址是: " & Hex(ptr2)
End Sub

运行两次，地址均不一样，由此可见，每次内存随机为变量分配地址。