vb用copymemory 读取内存数据问题

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (ByVal Destination As Any, ByVal Source As Any, ByVal Length As Long)
Private Sub Command1_Click()
Dim x As Variant '用于读出的结果存放变量
CopyMemory x, ByVal Int(&H14B234), 4
MsgBox x
End Sub


内存中数据已经用CheatEngine知道地址，为什么老是提示类型不匹配，如果把x设置成long型，直接vb出错退出，求指导

使用CopyMemory读取内存地址