jongle
|
CAPANEMA
PA - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 12/07/2013 15:33 hs
bom dia pessoal, estou mudando para MSHFlexGrid,
mais quando format uma coluna o valor fica errado:
ser for valor enteiro fica ok, mais se for "4,20" da um valor errardo
MSHFlexGrid1.TextMatrix(1, 4) = Format(MSHFlexGrid1.TextMatrix(1, 4), "#,##0.00")
desde ja agradeço
|
|
|
|
|
|
jongle
|
CAPANEMA
PA - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 13/07/2013 08:52 hs
trabalho pessoal com o banco firebord, sera que é por isso que nao formata certo?
|
|
|
|
NJNEWS
|
AMPARO
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 15/07/2013 09:54 hs
With MSHFlexGrid1 Dim i As Double
For i = 1 To MSHFlexGrid1.Rows - 1
.TextMatrix(i, 0) = Format(.TextMatrix(i, 0), "#,##0.00") Next |
|
|
|
NJNEWS
|
AMPARO
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 15/07/2013 09:56 hs
With MSHFlexGrid1 Dim i As Double
For i = 1 To MSHFlexGrid1.Rows - 1
.TextMatrix(i, 0) = Format(.TextMatrix(i, 0), "#,##0.00") ' <---- A Coluna que vc Quer Formatar Next |
|
|
|
jongle
|
CAPANEMA
PA - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 19/07/2013 15:02 hs
NAO DEU CERTO ser for valor enteiro fica ok, mais se for "4,20" da um valor errardo
meu banco é firebord.
|
|
|
|
NJNEWS
|
AMPARO
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 23/07/2013 20:14 hs
Faz assim que funciona... With MSHFlexGrid1 For x = .FixedRows To .Rows - 1
.TextMatrix(x, 0) = Format(.TextMatrix(x, 0), "##,##0.00")
Next x
End With |
|
|
|
