MouseUp Event
Description
Occurs when the user releases a mouse button.
Syntax
Public Event MouseUp( _
ByVal [Button](#) As Integer, _
ByVal [Shift](#) As Integer, _
ByVal [x](#) As Long, _
ByVal [y](#) As Long _
)
Parameters
- Button: Returns an integer that identifies the button that was released to cause the event.
- Shift: Returns an integer that corresponds to the state of the SHIFT, CTRL, and ALT keys when the button specified in the Button argument is released.
- x: Returns a number that specifies the current x coordinate location of the mouse pointer.
- y: Returns a number that specifies the current y coordinate location of the mouse pointer.
Remarks
Use a MouseDown or MouseUp event procedure to specify actions that will occur when a given mouse button is pressed or released. MouseDown and MouseUp events enable you to distinguish between the left, right, and middle mouse buttons.
Example
Private Sub RecentFileListBox_MouseUp(Button As Integer, Shift As Integer, x As Long, y As Long)
If (Button = vbRightButton) Then
Dim Item As CommandBarGalleryItem
Set Item = RecentFileListBox.HitTest(x, y)
If Not Item Is Nothing Then
Debug.Print Item.Caption
End If
End If
End Sub
See Also
Copyright (c) 1998-2024 Codejock Technologies. All rights reserved.