Imports Infragistics.Shared
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinGrid
Private Sub UltraGrid1_InitializeLayout(ByVal sender As Object, ByVal e As Infragistics.Win.UltraWinGrid.InitializeLayoutEventArgs) Handles UltraGrid1.InitializeLayout
' Set the ScrollStyle to immediate so that the UltraGrid scrolls the rows
' while the user drags the thumb. By default, UltraGrid displays a tooltip
' and scrolls the rows when the user releases the thumb.
e.Layout.ScrollStyle = ScrollStyle.Immediate
' Se the ScrollBounds to ScrollToFill so that the UltraGrid stops scrolling
' once the last visible row is fully visible. By default UltraGrid will
' continue scrolling until only a single row is visible.
e.Layout.ScrollBounds = ScrollBounds.ScrollToFill
End Sub