[VB.NET] Personalizzare colonna del controllo DataGrid

[canax]

Ciao a tutti.
Io ho un datagrid in un programma per win mobile 6.1, che riempio facendo un binding nella seguente maniera:

 sqlConnection = New SqlConnection(MainForm.genericFunc.strConn)
sqlConnection.Open()

Dim dt = New DataTable
Dim da = New SqlDataAdapter
DataGrid1.DataSource = dt

myCommand = New SqlCommand(strSqlQuery, sqlConnection)
Dim dtTemp = New DataTable
da.SelectCommand = myCommand
da.Fill(dt)
sqlConnection.close()

E fin qui tutto funziona, ho il mio datgrid contenente un certo numero di colonne che corrispondono a quelle richieste nella query.

A questo punto voglio colorare le celle di una colonna in base al loro contenuto.
quindi eredito il metodo paint della classe DataGridTextBoxColumn.

e aggiungo al codice indicato sopra le seguenti righe

 sqlConnection = New SqlConnection(MainForm.genericFunc.strConn)
sqlConnection.Open()

Dim dt = New DataTable
Dim da = New SqlDataAdapter
DataGrid1.DataSource = dt 

myCommand = New SqlCommand(strSqlQuery, sqlConnection)



Dim colColor As New ColorCell
colColor.MappingName = "IDPointType"
colColor.HeaderText = "IDPointType"
ts.GridColumnStyles.Add(colColor)
DataGrid1.TableStyles.Add(ts)
 

Dim dtTemp = New DataTable
da.SelectCommand = myCommand
da.Fill(dt)
sqlConnection.close()

Con questa modifica nel mio dataGrid mi viene visualizzata solo la colonna "colorata", e non più tutte le altre.

sapete come devo fare per visualizzare l'intera tabella e anche la colonna colorata, sento che sono vicino alla soluzione ma nn riesco a capire il trick per arrivare alla soluzione.

[canax]

Ho anche provato ad aggiungere lo stile a tutte le altre colonne così
es di una colonna:

        Dim IDPointType As New DataGridTextBoxColumn
        colColor.MappingName = "IDPointType"
        colColor.HeaderText = "IDPointType"
        ts.GridColumnStyles.Add(IDPointType)

e adesso mi viene visualizzata solo l'ultima colonna tutte le altre non le vedo, non sapete il perchè?