ObjectARX acedGrRead () on how to use VB.NET?

The third parameter of the method, in vb.net and c + + is somewhat different, now I am in the program can be invoked to, but the third parameter is always have no value, masters help you solve, thank you,

Below is I use the code in the VB.NET:

Public Shared Function acedGrRead (ByVal track As an Integer, ByRef type As an Integer, ByRef res As IntPtr) As an Integer
End the Function

Public Sub test ()

Dim As IntPtr p
Dim type As Integer=3

AcedGrRead (type 1, p)

'type, can return, according to trigger the way right such as keyboard input, mouse button around, mobile etc.
'but the third parameter p are always return to Zero, I don't know is how to return a responsibility?
If p & lt;> IntPtr. Zero Then
Dim rb As ResultBuffer=ResultBuffer. Create (Res, True)
Rb. The Dispose ()
End the If

End Sub

There is something wrong with the method is to use? Please directly,