Getting Attempted to read or write protected memory error while calling EnumWindows

See more:

VB

Hi,

I am getting Attempted to read or write protected memory. This is often an indication that other memory is corrupt. while I am calling EnumWindows. Opening my vb.net from through main module

'Globally declare
                 Declare Function EnumWindows Lib "user32" (ByVal x As CallBack, ByVal y As Integer) As Integer
                 Public Delegate Sub CallBack()

  'Function declared in Main module
        Public Sub AddProcessReply()

'Calling function

               Dim intAddressOf As Integer
               intAddressOf = EnumWindows(AddressOf AddProcessReply, 0)
               Ret = .Back(intAddressOf)               // Back function is VC++ function from vb.net 

i am passing function pointer but I am getting error

Thanks..