[VBCompiler]
LinkSwitches= "libacof32.lib" /EXPORT:A_memcpy

void * A_memcpy(void * dest, const void * src, size_t count);

Option Explicit
Private Declare Sub CopyMemory Lib "asmlibDll.dll" Alias "A_memcpy" (ByVal lpvDest As Long, ByVal lpvSource As Long, ByVal cbCopy As Long)
Private Sub Command_Click()
    Dim z As Long
    Dim b As Long
    z = 1234
    CopyMemory VarPtr(b), VarPtr(z), 4
    MsgBox b
End Sub

Private Declare Sub CopyMemory Lib "asmlibDll.dll" Alias "A_memcpy" (ByVal lpvDest As Long, ByVal lpvSource As Long, ByVal cbCopy As Long)

Public Sub asmCopyMemory(lpvDest As Long, lpvSource As Long, ByVal cbCopy As Long)
    CopyMemory lpvDest, lpvSource, cbCopy
End Sub