SoloCodigo

esta es la forma pero no se como darle formato de tamaño color y del texto
ya esta casi todo solo falta eso
   
Sub cargarcboGrilla()
        Dim dts = objInstructor.ListAllbySede(cboSede.SelectedValue)
        darformatogrilla()
        gvUltimosHorarios.DataSource = dts.TABLES("Table")
        gvUltimosHorarios.DataBind()
    End Sub
    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        cargarcboGrilla()
    End Sub
    Sub darformatogrilla()
        'Buscar BoundField() en la ayuda del net

        Dim Cod_Instruc = New BoundField
        Cod_Instruc.HeaderText = "Cod_Instruc"
        Cod_Instruc.DataField = "Cod_Instruc"

        Dim tableStyle As New TableItemStyle()
        tableStyle.HorizontalAlign = HorizontalAlign.Center
        tableStyle.VerticalAlign = VerticalAlign.Middle
        'tableStyle.Width = Unit.Pixel(100)
        tableStyle.ForeColor = Drawing.Color.Blue
        Cod_Instruc.add(tableStyle)
        'Cod_Instruc.headerstyle.backcolor = "Yellow"



        Dim nombre = New BoundField
        nombre.HeaderText = "nombre"
        nombre.DataField = "nombre"


        gvUltimosHorarios.Columns.Add(Cod_Instruc)
        gvUltimosHorarios.Columns.Add(Nombre)
    End Sub