Imports Infragistics.Win Imports Infragistics.Win.UltraWinGrid Private Sub Button2_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button2.Click If Me.ultraGrid1.ActiveRow Is Nothing Then Return Dim eventManager As GridEventManager ' Get the grid's event manager. ' The event manager is used to temporarily disable events ' to prevent them from being raised. This can be very ' convenient in a situation where one or more properties ' are being set in code and the events they would normally ' raise would cause unnecessary or counter-productive ' code to be executed. ' ' Note: All events are enabled by default. eventManager = Me.ultraGrid1.EventManager ' Disable the Before/AfterSelectChange events eventManager.SetEnabled(GridEventIds.BeforeSelectChange, False) eventManager.SetEnabled(GridEventIds.AfterSelectChange, False) ' Toggle the selection state of the active row. ' Note: This would normally cause the Before/AfterSelectChange ' events to be raised. However, since the above code disabled ' the events they won't be. Me.ultraGrid1.ActiveRow.Selected = Not Me.ultraGrid1.ActiveRow.Selected ' Re-enable the Before/AfterSelectChange events eventManager.SetEnabled(GridEventIds.BeforeSelectChange, True) eventManager.SetEnabled(GridEventIds.AfterSelectChange, True) ' The 'AllEventsEnabled' property lets you enable/disable ' all events will a single line of code. If any event is ' disabled the 'AllEventsEnabled' property returns false. If eventManager.AllEventsEnabled = False Then eventManager.AllEventsEnabled = True End If ' The event manager also exposes an 'IsEnabled' method ' to see if an event is enabled or disbled. If False = eventManager.IsEnabled(GridEventIds.BeforeSelectChange) Then eventManager.SetEnabled(GridEventIds.BeforeSelectChange, True) End If ' The grid event manager also exposes overloaded ' 'IsEnabled' and 'SetEnabled' methods that take an ' event group so that, for example all 'Before' or all ' 'After' events can be enabled/disabled. If any event ' in the group is disabled the 'IsEnabled' method returns ' false. If False = eventManager.IsEnabled(EventGroups.BeforeEvents) Then eventManager.SetEnabled(EventGroups.BeforeEvents, True) End If eventManager.SetEnabled(EventGroups.AfterEvents, True) ' The 'InProgress' method will return true if the ' specified event is currently being raised. This ' is often helpful in methods that can be called ' from various points in an application to determine ' wahat is triggering the call. If eventManager.InProgress(GridEventIds.BeforeSelectChange) Then ' ... End If ' The UltraCombo and UltraDropDown controls also expose ' event managers for their custom events. However, ' since they have considerably fewer events they don't ' expose overloaded 'IsEnabled' and 'SetEnabled' methods ' to control groups of events. Dim comboManager As ComboEventManager comboManager = Me.ultraCombo1.EventManager comboManager.SetEnabled(ComboEventIds.BeforeDropDown, True) Dim dropDownManager As DropDownEventManager dropDownManager = Me.UltraDropDown1.EventManager dropDownManager.SetEnabled(DropDownEventIds.AfterCloseUp, True) End Sub