FLEX/GRID
Publicado por Martin (22 intervenciones) el 08/10/2007 02:37:15
Hola, ojala me puedan ayudar, tengo un formulario con ADO data control (Access) con formato FlexGRID con tres columnas, en la ultima columna tengo precios y no se como hacer para que me aparezcan los decimales porque el origen de la tabla tiene decimales.
CREO TENER EL CODIGO DE PROGRAMACION PERO NO SE DONDE APLICARLO
EN QUE EVENTO DEL FORMULARIO.
MUCHAS GRACIAS
EL CODIGO QUE TENGO ES ESTE
Dim fila As Long, colum As Integer
colum = 3
For fila = 0 To .Rows - 1
.TextMatrix(fila, colum) = Replace(.TextMatrix(fila, colum), ".", ",")
.TextMatrix(fila, colum) = Format(CStr(.TextMatrix(fila, colum)), "#,##0.00")
Next fila
End With
CREO TENER EL CODIGO DE PROGRAMACION PERO NO SE DONDE APLICARLO
EN QUE EVENTO DEL FORMULARIO.
MUCHAS GRACIAS
EL CODIGO QUE TENGO ES ESTE
Dim fila As Long, colum As Integer
colum = 3
For fila = 0 To .Rows - 1
.TextMatrix(fila, colum) = Replace(.TextMatrix(fila, colum), ".", ",")
.TextMatrix(fila, colum) = Format(CStr(.TextMatrix(fila, colum)), "#,##0.00")
Next fila
End With
Valora esta pregunta
0