datagrid problem

I keep getting an error when trying to populate my datagrid. everytime it hits the line for the mapping name it throws a null reference exception??? what am i doing wrong?

VB Code:

Try
            Dim ds As New Data.DataSet
 
            Dim da As New OleDb.OleDbDataAdapter("select * from library_tbl", cn)
 
            da.Fill(ds)
            Me.DataGrid1.DataSource = ds
            With Me.DataGrid1.TableStyles
                With .Item("dgtsLibId")
                    .MappingName = "library_tbl"
                End With
            End With
 
        Catch ex As Exception
            MessageBox.Show(ex.ToString)
        End Try

Try this:

VB Code:

Try
        Dim ds As New Data.DataSet
 
        Dim da As New OleDb.OleDbDataAdapter("select * from library_tbl", cn)
 
        da.Fill(ds)
        Me.DataGrid1.DataSource = ds
 
        With Me.DataGrid1.TableStyles
            [B]Dim tableStyle1 As New DataGridTableStyle[/B]
            With .Item("dgtsLibId")
                [B]tableStyle1[/b].MappingName = "library_tbl"
            End With
        End With
 
    Catch ex As Exception
        MessageBox.Show(ex.ToString)
    End Try

My changes are in bold. It worked on my machine.

One other thing to note: I believe MappingName is case sensitive.

Good luck!