event DblClick (Shift as Integer, X as OLE_XPOS_PIXELS, Y as OLE_YPOS_PIXELS)
Occurs when the user dblclk the left mouse button over an object.

 TypeDescription 
   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.  

Use the DblClick event to notify your application that user has dbl clicked the control. Use the PageFromPoint property to get the page from the cursor.

The following sample prints the caption of the page that was dbl clicked:

Private Sub Tab1_DblClick(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 page " & .Pages(.Pages.PosToIndex(p)).Caption
        End If
    End With
End Sub

Send comments on this topic.
© 1999-2010 Exontrol Inc, Software. All rights reserved.