Imports Infragistics.Shared
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinGrid
Imports System.Diagnostics
Private Sub Button5_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button5.Click
' Following code sets up the ultraGrid1 with 2 colum-scroll-regions and two
' row-scroll-regions and thus having a total of 4 row-col-intersection regions.
' Split the column-scroll-region and the row-scroll-region each.
Me.ultraGrid1.DisplayLayout.ColScrollRegions(0).Split()
Me.ultraGrid1.DisplayLayout.RowScrollRegions(0).Split()
End Sub
Private Sub UltraGrid1_BeforeColRegionRemoved(ByVal sender As Object, ByVal e As Infragistics.Win.UltraWinGrid.BeforeColRegionRemovedEventArgs) Handles ultraGrid1.BeforeColRegionRemoved
Debug.WriteLine("ColScrollRegion with index of " & e.ColScrollRegion.Index & " is being removed. Canceling it.")
' Set Cancel to true to prevent the user from removing a colum scroll region.
e.Cancel = True
End Sub
Private Sub UltraGrid1_BeforeRowRegionRemoved(ByVal sender As Object, ByVal e As Infragistics.Win.UltraWinGrid.BeforeRowRegionRemovedEventArgs) Handles ultraGrid1.BeforeRowRegionRemoved
Debug.WriteLine("RowScrollRegion with index of " & e.RowScrollRegion.Index & " is being removed. Canceling it.")
' Set Cancel to true to prevent the user from removing a row scroll region.
e.Cancel = True
End Sub