ColResize Event Example

This example resizes all the columns to the size of the first column if the user sizes the first column.

Private Sub DataGrid1_ColResize (ColIndex As Integer, Cancel As Integer)
   Dim nCol As Column
   If ColIndex = 1 Then
      For Each nCol In DataGrid1.Columns
         nCol.Width = DataGrid.Columns(1).Width
      Next
   End If
End Sub