vb System.Windows.Automation.Provider.ISelectionItemProvider.RemoveFromSelection类(方法)实例源码

''' <summary>
''' Removes the item from the selection in list boxes that support 
''' multiple selection or no selection at all.
''' </summary>
''' <remarks>
''' selectedItems is the collection of selected ListItems.
''' </remarks>
Public Sub RemoveFromSelection() Implements ISelectionItemProvider.RemoveFromSelection
    ' Return if the item is already selected.
    If (CType(Me, ISelectionItemProvider)).IsSelected Then
        Return
    End If
    If (CType(Me, ISelectionProvider)).IsSelectionRequired And selectedItems.Count <= 0 Then
        Throw New InvalidOperationException("Operation cannot be performed.")
    End If

    selectedItems.Remove(Me)
    ' TODO: Update UI.
End Sub

''' <summary>
''' Specifies whether the item is selected.
''' </summary>
''' <remarks>
''' selectedItems is the collection of selected ListItems.
''' </remarks>
Public ReadOnly Property IsSelected() As Boolean Implements ISelectionItemProvider.IsSelected
    Get
        Return selectedItems.Contains(Me)
    End Get
End Property