Reflection Desktop VBA Guide
Attachmate.Reflection.Objects.Emulation.IbmHosts Library / Attachmate.Reflection.Objects.Emulation.IbmHosts Library / MouseMapper Object / Contains Method
A MouseButtonCombination object that contains the mouse/key combination to query for.
Example
In This Topic
Contains Method (MouseMapper)
In This Topic
Returns whether the current mouse map has a mapping for the specified mouse/key combination.
Syntax
expression.Contains( _
   ByVal mapping As MouseButtonCombination _
) As Boolean
where expression is a variable that represents a MouseMapper Object

Parameters

mapping
A MouseButtonCombination object that contains the mouse/key combination to query for.

Return Value

True if the current keyboard map contains a mapping for key, false if not.
Example
Check mouse map to determine whther the WheelDown button is mapped.
Public Sub CheckForMouseButtonCombination()
 
    Dim combo As MouseButtonCombination
    Dim ret As Boolean
   
    Set combo = New MouseButtonCombination
   
    'Set the mouse button as mouse wheel down
    combo.WheelDirection = MouseWheelDirection_WheelDown
   
    'Check for the mouse button combination in the mouse map
    ret = ThisIbmTerminal.MouseMapper.contains(combo)
    If ret Then
        Debug.Print "Mouse map contains WheelDown mapping"
    Else
        Debug.Print "Mouse map doesn't contain WheelDown mapping"
    End If
 
End Sub
See Also

Reference

MouseMapper Object
MouseMapper Members

Send Feedback