Haber si este codigo te ayuda un poco, primero creas tantos objetos boxcolumn como columnas desees visualizar y su propiedad mapping debe ser igual al nombre de los campos, luego creas un objeto tablestyle, su propiedad mapping debe tener el mismo nombre de la tabla creada en el dataset y finalmente asignas el objeto tablestyle al datagrid (ts1.AlternatingBackColor = System.Drawing.SystemColors.InfoText
es para dar color a las filas en forma alternada):
Private Sub m_ListarCliente()
Dim ts1 As DataGridTableStyle = New DataGridTableStyle
Dim cs1 As DataGridTextBoxColumn = New DataGridTextBoxColumn
Dim cs2 As DataGridTextBoxColumn = New DataGridTextBoxColumn
DataGrid1.TableStyles.Clear()
DataGrid1.DataSource = TuDataTable
cs1.MappingName = "Cli_Codigo"
cs1.HeaderText = "Código"
cs1.Width = 30
cs2.MappingName = "Cli_Nombre"
cs2.HeaderText = "Nombre"
cs2.Width = 130
ts1.MappingName = "Cliente"
ts1.AlternatingBackColor = System.Drawing.SystemColors.InfoText
ts1.GridColumnStyles.Add(cs1)
ts1.GridColumnStyles.Add(cs2)
DataGrid1.TableStyles.Add(ts1)
End Sub