vb.net Datagrid problem - column widths

L

lauriemc

Freshman
Joined
Feb 2, 2007
Messages
26
I adapted this code from another thread in order to format my column widths. Now what my datagrid is doing is showing NOTHING, no rows, no columns, splat. I am posting the code in the hopes someone can tell me what I am doing wrong...

Visual Basic: 
Dim ds As DataSet = New DataSet
        drRead.Fill(ds, sptable)

        With Me.dgFile
            .DataSource = ds.Tables(sptable)
            .CaptionText = sptable & " Table"
            .Visible = True
            If sptable = "Report_tbl" Then
                .Width = 704
            Else
                .Width = 560
            End If
            .PreferredColumnWidth = 75
        End With

        Dim dgts1 As New DataGridTableStyle
        With dgts1
            .MappingName = sptable
        End With

        Dim grdColumn1 As New DataGridTextBoxColumn
        With grdColumn1
            .Width = 500
        End With

        Dim grdColumn2 As New DataGridTextBoxColumn
        With grdColumn2
            .Width = 2000
        End With

        Dim grdColumn3 As New DataGridTextBoxColumn
        With grdColumn3
            .Width = 800
        End With

        Dim grdColumn4 As New DataGridTextBoxColumn
        With grdColumn4
            .Width = 800
        End With

        Dim grdColumn5 As New DataGridTextBoxColumn
        With grdColumn5
            .Width = 800
        End With

        Dim grdColumn6 As New DataGridTextBoxColumn
        With grdColumn6
            .Width = 800
        End With

        Dim grdColumn7 As New DataGridTextBoxColumn
        With grdColumn6
            .Width = 800
        End With

        Dim cols() As DataGridColumnStyle = {grdColumn1, grdColumn2, grdColumn3, grdColumn4, grdColumn5, grdColumn6, grdColumn7}
        dgts1.GridColumnStyles.AddRange(cols)

        dgFile.TableStyles.Add(dgts1)

        Me.dgFile.Show()
 
Last edited by a moderator:
Maybe there's no result in the Dataset. Have you check the select query used for the Fill method?

How about testing your code without using any table styles? That way you'll narrow down the source of the problem into Fill result and binding method.

Also try checking the MappingName properties. If I'm not mistaken you should also set the MappingName for the Columns in your TableStyles. I can see in your code that you're simply setting the MappingName for your TableStyles.
 
Last edited:
When I comment out this line:

dgFile.TableStyles.Add(dgts1)

then the table fills. So I don't think it's the dataset.

I will look into setting the mapping name for the columns ... any examples ?

Thank you, laurie mc
 
You were right about the mapping. When I mapped the column to the column name in the SQL Server table, it worked.

Dim grdColumn7 As New DataGridTextBoxColumn
With grdColumn7
.MappingName = "DateExpiration"
.HeaderText = "Date Expires"
.Width = 80
End With
dgts1.GridColumnStyles.Add(grdColumn7)

I also attached the columns singly to the data grid table style (dgts1) as opposed to a AddRange attach, but I think once I corrected the Mapping Name, it would have still worked.

Thanks :o
 
Back
Top