' Configuramos el objeto Command
cm = New SqlCommand("SELECT [orden/partida],[nºrevision] from De100m5 where [orden/partida]=@NAME order by [orden/partida]", cnGOBEX400)
'... aqui va mas codigo para el dataadapter...
Dim DGcolumna As DataGridTextBoxColumn
Dim DGTabla As DataGridTableStyle
DGcolumna = New DataGridTextBoxColumn
With DGcolumna
.MappingName = "orden/partida"
.HeaderText = "ORDEN PARTIDA"
.Width = 115
.ReadOnly = True
.Alignment = HorizontalAlignment.Center
End With
DGTabla.GridColumnStyles.Add(DGcolumna) '***El ERROR me aparece en esta linea
Me.DGOrdenes.TableStyles.Add(DGTabla)
DGcolumna = Nothing
'Hago lo mismo del with por cada columna
' Configuramos el control DataGrid
DGOrdenes.DataSource = DSDe100m5.Tables("de100m5")