Private DataGrid1 As New DataGrid()
 
    Public Property TableStyles() As _
      System.Windows.Forms.GridTableStylesCollection
        Get
            Return DataGrid1.TableStyles '    DataGrid1.TableStyles
        End Get
        Set(ByVal Value As System.Windows.Forms.GridTableStylesCollection)
            Dim dgts As System.Windows.Forms.DataGridTableStyle
            Dim dgcs As System.Windows.Forms.DataGridColumnStyle
            Dim i As Integer = 0
 
            For Each dgts In Value
                DataGrid1.TableStyles.Add(dgts)
                For Each dgcs In Value.Item(i).GridColumnStyles
                    DataGrid1.TableStyles.Item(i).GridColumnStyles.Add(dgcs)
                Next
                i = i + 1
            Next
        End Set
    End Property

Gru? Rub

(PS: Besuch doch mal meine Seiten http://e-liquids.de und http://jjpassion.de)