Foros del Web

Foros del Web (http://www.forosdelweb.com/)
-   .NET (http://www.forosdelweb.com/f29/)
-   -   Formatear Columna de Datagrid (http://www.forosdelweb.com/f29/formatear-columna-datagrid-312284/)

alehawk 29/06/2005 16:10

Formatear Columna de Datagrid
 
Hola, quisiera formatear una columna de datagrid en particular.

Asi lleno al datagrid:

Código:

        cn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & nombrebase & ";Persist Security Info=False")  ' note 5323 is the name of dbase
        rs2.Open(tablanombre, cn, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic)
        ds.Tables.Add(tablanombre)
        ol.Fill(ds.Tables(tablanombre), rs2)
        ds.DataSetName = cn.ConnectionString
        Me.MSGrid.DataSource = ds.Tables(tablanombre)
        MSGrid.CaptionText = nombrebase
        ''MsgBox(MSGrid.DataSource.columns.count)
        ''MsgBox(MSGrid.DataSource.columns.item(1).columnname())
        ''MsgBox(MSGrid.TableStyles(1).ToString)
        Call AutoSizeDataGridColumns(MSGrid, tablanombre, 1)
        cn.Close()

Como hago por ejemplo para cambiar el formato de la columna 2 por ejemplo a MM/dd/yyyy H:mm:ss ?

Gracias!

Rony J. 29/06/2005 16:26

Si no me equivoco lo puedes hacer por la propiedad TableStyles del datagrid, alli ubicarias la columna que deseas y en la propiedad format le pasas la cadena de formato que desees..

http://support.microsoft.com/default...d=kb;ES;317859
http://www.forosdelweb.com/showthrea...light=datagrid

Suerte y saludos.

alehawk 29/06/2005 18:12

Gracias Rony, ahora le pego una mirada!

alehawk 29/06/2005 19:06

Exceletne tu link, despues de probar pude lograrlo de la siguiente manera, primero identifico que tabla es la que quiero darle el formato y luego lo logre con este codigo:
Código:

    Private Sub WriteMappingNames()
        Dim dgt As DataGridTableStyle
        For Each dgt In MSGrid.TableStyles
            Console.WriteLine(dgt.MappingName)
            Dim dgc As DataGridTextBoxColumn
            For Each dgc In dgt.GridColumnStyles
                ''    MsgBox(dgc.MappingName)
                dgc.NullText = "[Vacío]"
                If dgc.MappingName = mfecha Then
                    ''  dgc.HeaderText = "dsfg"
                    dgc.Format = "dd MM yyyy hh:mm:ss"
                    dgc.NullText = Date.Now
                    Exit Sub
                End If
                ''                dgc.DataGridTableSty()
            Next dgc
        Next dgt
    End Sub



La zona horaria es GMT -6. Ahora son las 00:40.

Desarrollado por vBulletin® Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.