Public Class ActiveStrategyListBoxV

   ''' <summary>
   ''' Funzione che permette di riselezionare l'elemento ActiveStrategyList della lista già selezionato
   ''' </summary>
   ''' <param name="sender"></param>
   ''' <param name="e"></param>
   Private Sub ActiveStrategyList_PreviewMouseDown(sender As Object, e As MouseButtonEventArgs)
      Dim item As Object = ActiveStrategyListBox.SelectedItem
      ActiveStrategyListBox.SelectedItem = Nothing
      ActiveStrategyListBox.SelectedItem = item
   End Sub

End Class