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