Datagrid Formatting (row header)

[topmade]

I was wondering if anyone knows how to insert text or data into the row header of a datagrid? iAny help would be great. Thanks in advnace!

Topmade

 

[Robby]

something like this...

        Dim dgStyle As New DataGridTableStyle()
        With dgStyle
            .AlternatingBackColor = Color.LightGray
            .BackColor = Color.WhiteSmoke
            .ForeColor = Color.MidnightBlue
            .GridLineColor = Color.Honeydew
            .HeaderBackColor = Color.MidnightBlue
            .HeaderFont = New Font("Arial", 8.0!, FontStyle.Bold)
            .HeaderForeColor = Color.White
            .LinkColor = Color.Teal
            .MappingName = "Appointments"
            .SelectionBackColor = Color.Yellow
            .SelectionForeColor = Color.DarkMagenta
        End With
        Dim grd As New DataGridTextBoxColumn()
        With grd
            .HeaderText = "Some title"
            .MappingName = "myFieldName"
            .Alignment = HorizontalAlignment.Center
            .Width = 45
        End With

        dgStyle.GridColumnStyles.AddRange(New DataGridColumnStyle() {grd})
        DataGrid1.TableStyles.Add(dgStyle)

 

[topmade]

I still cant get it to work. Im bindng it to a dataset, does this have anything to do with it? What am I doing wrong?

Dim CN As New OleDb.OleDbConnection(strPath)
CN.Open()
DataAdapter
Dim DA As New OleDb.OleDbDataAdapter _
("Select * from Users ", CN)
Dataset
Dim DS As New DataSet()
Fill DataAdapter
DA.Fill(DS, "Users")
Hide a column
DS.Tables("Users").Columns("UserId").ColumnMapping = MappingType.Hidden
Dim my As New System.Data.DataTable()

Change a column name
DS.Tables("Users").Rows(1)
DS.Tables("Users").Columns("City").ColumnName = "Expense Type"

Dim dgStyle As New DataGridTableStyle()
With dgStyle
.AlternatingBackColor = Color.LightGray
.BackColor = Color.WhiteSmoke
.ForeColor = Color.MidnightBlue
.GridLineColor = Color.Honeydew
.HeaderBackColor = Color.MidnightBlue
.HeaderFont = New Font("Arial", 8.0!, FontStyle.Bold)
.HeaderForeColor = Color.White
.LinkColor = Color.Teal
.MappingName = "UserNamerr"
.SelectionBackColor = Color.Yellow
.SelectionForeColor = Color.DarkMagenta
End With
Dim grd As New DataGridTextBoxColumn()
With grd
.HeaderText = "ydghdgfhdgf"
.MappingName = "UserNamegdh"
.Alignment = HorizontalAlignment.Center
.Width = 45
End With
Bind data to DataGrid
DataGrid1.SetDataBinding(DS, "Users")
dgStyle.GridColumnStyles.AddRange(New DataGridColumnStyle() {grd})
DataGrid1.TableStyles.Add(dgStyle)

Topmade