Imports Infragistics.Win
Imports Infragistics.Win.UltraWinTabs
Imports Infragistics.Win.UltraWinTabbedMdi
Private Sub ultraTabbedMdiManager1_TabGroupScrolling(ByVal sender As Object, ByVal e As Infragistics.Win.UltraWinTabbedMdi.MdiTabGroupScrollingEventArgs) Handles ultraTabbedMdiManager1.TabGroupScrolling
' The 'TabGroupScrolling' event will occur when the
' tabs within an MdiTabGroup are about to be scrolled.
'
' The 'Cancel' parameter may be set to true to
' prevent the scroll operation from occuring.
'
'e.Cancel = True
Dim sb As System.Text.StringBuilder = New System.Text.StringBuilder()
sb.Append("TabGroupScrolling:")
' The 'TabGroup' returns the MdiTabGroup whose tabs
' are to be scrolled.
sb.AppendFormat(" TabGroup = '{0}',", e.TabGroup)
' The 'ScrollType' parameter indicates if the user is
' scrolling one tab, one page of tabs, etc.
sb.AppendFormat(" ScrollType = {0}, ScrollIncrement= {1}", e.ScrollType, e.ScrollIncrement)
System.Diagnostics.Debug.WriteLine(sb.ToString())
End Sub