gluTessCallback tobj, GLU_TESS_VERTEX, AddressOf glVertex3dvCB gluTessCallback tobj, GLU_TESS_BEGIN, AddressOf glBeginCB gluTessCallback tobj, GLU_TESS_END, AddressOf glEndCB
Dim CallC As New CallCC(AddressOf MyCall.glEndCB) Dim returnValue3 As IntPtr = Marshal.GetFunctionPointerForDelegate(CallC) gluTessCallback(tobj, GLU_TESS_VERTEX, returnValue3)