Demetrio Cassarino
27 lines
1014 B
VB.net
27 lines
1014 B
VB.net
Public Class StrategyV
|
|
|
|
''' <summary>
|
|
''' Funzione che permette di riselezionare l'elemento DeactivateStrategyList della lista già selezionato
|
|
''' </summary>
|
|
''' <param name="sender"></param>
|
|
''' <param name="e"></param>
|
|
Private Sub DeactivateStrategyList_PreviewMouseDown(sender As Object, e As MouseButtonEventArgs)
|
|
Dim item As Object = DeactivateStrategyListBox.SelectedItem
|
|
DeactivateStrategyListBox.SelectedItem = Nothing
|
|
DeactivateStrategyListBox.SelectedItem = item
|
|
End Sub
|
|
|
|
|
|
''' <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
|