''' <summary>
''' Uses AndCondition to retrieve elements that match both of two conditions.
''' </summary>
''' <param name="elementMainWindow">An application window element.</param>
Public Sub AndConditionExample(ByVal elementMainWindow As AutomationElement)
    If elementMainWindow Is Nothing Then
        Throw New ArgumentException()
    End If

    Dim conditionEnabledButtons As New AndCondition(New PropertyCondition(AutomationElement.IsEnabledProperty, True), New PropertyCondition(AutomationElement.ControlTypeProperty, ControlType.Button))
    Dim enabledButtons As AutomationElementCollection = elementMainWindow.FindAll(TreeScope.Subtree, conditionEnabledButtons)
    Console.WriteLine("Enabled buttons:")
    Dim autoElement As AutomationElement
    For Each autoElement In enabledButtons
        Console.WriteLine(autoElement.Current.Name)
    Next autoElement

    ' Example of getting the conditions from the AndCondition.
    Dim conditions As Condition() = conditionEnabledButtons.GetConditions()
    Console.WriteLine("AndCondition has " & conditions.GetLength(0) & " subconditions.")

End Sub