VB6 Projekt in VB.NET neu schreiben

[Newbie]

Hallo Leute
Ich schreibe gerade ein VB6 Programm in VB.NET neu.
Ich habe da allerdings ein Problem.
Ich habe Folgenden API Aufruf:

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (ByVal _
  Destination As Integer, ByVal Source As Integer, ByVal Length As Integer)

Hier wird er verwendet:

CopyMemory(VarPtr(mMyArea), MyAreaPtr, Len(mMyArea))

Die Function "VarPtr" gibt es ja in .NET nicht mehr.
Dazu habe ich folgendes im Netz gefunden:

Public Function VarPtr(ByVal e As Object) As Integer
    Dim GC As GCHandle = GCHandle.Alloc(e, GCHandleType.Pinned)
    Dim GC2 As Integer = GC.AddrOfPinnedObject.ToInt32
    GC.Free()
    Return GC2
End Function

Jetzt bekomme ich folgenden Fehler, sobald die Funktion "VarPtr" aufgerufen wird:

Das Objekt enthält keine primitiven Daten.

der Fehler tritt in folgender Zeile auf:

Dim GC As GCHandle = GCHandle.Alloc(e, GCHandleType.Pinned)

Bin schon langsam am verzweifeln

MfG
Steve

[gfoidl]

Hallo,

API-Aufrufe - in .net P/Invoke genannt - können mit http://www.pinvoke.net/ ermittelt werden.

Für dein Problem: http://www.pinvoke.net/default.aspx/...opyMemory.html

mfG Gü