Imports System.Diagnostics
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinExplorerBar
Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button6.Click
' If the ActiveItem is in the last group, activate the first Item in the
' previous Group.
If ((Me.ultraExplorerBar1.CurrentState & UltraExplorerBarStates.ActiveItemIsInLastGroup) = UltraExplorerBarStates.ActiveItemIsInLastGroup) Then
Me.ultraExplorerBar1.PerformAction(UltraExplorerBarAction.ActivateFirstItemInPreviousGroup)
End If
' If the ActiveItem is in the first group, activate the first Item in the
' next Group.
If ((Me.ultraExplorerBar1.CurrentState & UltraExplorerBarStates.ActiveItemIsInFirstGroup) = UltraExplorerBarStates.ActiveItemIsInFirstGroup) Then
Me.ultraExplorerBar1.PerformAction(UltraExplorerBarAction.ActivateFirstItemInNextGroup)
End If
End Sub