Enters the control in 'ReaderMode' a mouse scrolling mode that allows you to scroll in any direction by moving the mouse pointer. Callbacks are used to inform the control of the offset it should scroll. The Control is responsible for updating the scroll position. The function must be passed the READERMODEINFO structure. This function has no public header and must be referenced as ordinal 383, as per MSDN documentation.

Private Shared Sub DoReaderMode(ByRef prmi As READERMODEINFO)

READERMODEINFO

Private Shared Sub DoReaderMode(ByRef prmi As READERMODEINFO)

Private Structure READERMODEINFO

Dim SetReaderModeInfo As READERMODEINFO

SetReaderModeInfo = New READERMODEINFO

SetReaderModeInfo.hwnd = Me.Handle

SetReaderModeInfo.fFlags = 1

SetReaderModeInfo.prc = pnt

SetReaderModeInfo.pfnScroll = New ReaderScrollCallbackDelegate(AddressOf ReaderScrollCallback)

SetReaderModeInfo.fFlags2 = New TranslateDispatchCallbackDelegate(AddressOf TranslateDispatchCallback)

SetReaderModeInfo.lParam = IntPtr.Zero

SetReaderModeInfo.cbSize = Marshal.SizeOf(SetReaderModeInfo)

DoReaderMode(SetReaderModeInfo)

Private Delegate Function ReaderScrollCallbackDelegate(ByRef prmi As READERMODEINFO, dx As Integer, dy As Integer) As Boolean

Private Function ReaderScrollCallback(ByRef prmi As READERMODEINFO, dx As Int32, dy As Int32) As Boolean

Access PInvoke.net directly from VS: