eXontrol Software - Tab ActiveX, NET Control

The MouseMove event is generated continually as the mouse pointer moves across objects. Unless another object has captured the mouse, an object recognizes a MouseMove event whenever the mouse position is within its borders. Use the PageFromPoint property to get the page over the cursor. The following sample prints the page's key over the cursor:

Private Sub Tab1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    With Tab1
        Dim p As Long
        p = .PageFromPoint(X / Screen.TwipsPerPixelX, Y / Screen.TwipsPerPixelY)
        If (p >= 0) Then
            Debug.Print "The cursor is over the page '" & .Pages(.Pages.PosToIndex(p)).Key & "'"
        End If
    End With
End Sub

Send comments on this topic.

		Type	Description
		Button as Integer	An integer that corresponds to the state of the mouse buttons in which a bit is set if the button is down.
		Shift as Integer	An integer that corresponds to the state of the SHIFT, CTRL, and ALT keys.
		X as OLE_XPOS_PIXELS	A single that specifies the current X location of the mouse pointer. The x values is always expressed in container coordinates
		Y as OLE_YPOS_PIXELS	A single that specifies the current Y location of the mouse pointer. The y values is always expressed in container coordinates