Multiple Expander have to collapse if ONE is expanded

Question

Having 4 Expander controls. When one expander is expanded how can I make all others collapse/close?

Answer 1

Just setting the Lost focus seems to be the easiest way to do this.

Xaml:

VB:

Private Sub CollapseExpander(ByVal sender As System.Object, ByVal e As System.Windows.RoutedEventArgs)

 sender.IsExpanded = False

End Sub