Dim ts As New DataGridTableStyle
        Dim tbc As DataGridTextBoxColumn
        Dim aColumnTextColumn As DataGridNoActiveCellColumnMultiple
 
 
        ts.MappingName = "TAETIGKEIT"
 
        ts.HeaderBackColor = System.Drawing.Color.AliceBlue
 
        ts.RowHeadersVisible = False
 
 
        ts.BackColor = System.Drawing.Color.AliceBlue
 
        ' Spalte 1 PROJEKTNR-- Projektnummer
        tbc = New DataGridTextBoxColumn
        tbc.MappingName = "PROJEKTNR"
        tbc.Alignment = HorizontalAlignment.Center
        tbc.HeaderText = "Projekt-Nr."
        tbc.Width = 159
        tbc.TextBox.Enabled = True
        ts.GridColumnStyles.Add(tbc)
        ts.AllowSorting = False
        ts.ReadOnly = True