GRAVAR VALOR DECIMAL MYSQL

JLSMA 07/12/2012 11:33:04
#415606

BOM DIA

ESTOU COM DIFICULDADE EM GRAVAR VALOR DECIMAR NO CAMPO SALDO ](DECIMAL(10,2)

TENTEI AS SEGUINTE OPÇÕES
[ô]Sql = Sql & [Ô][ô][Ô] & Val(Format(VarSaldo, [Ô]0.00[Ô])) & [Ô][ô],[Ô]
[ô]Sql = Sql & [Ô][ô][Ô] & Replace(VarSaldo, [Ô].[Ô], [Ô],[Ô]) & [Ô][ô],[Ô]
Sql = Sql & [Ô][ô][Ô] & Replace(VarSaldo, [Ô],[Ô], [Ô].[Ô]) & [Ô][ô],[Ô]


EM TODAS ELE ZERA O DECIMAL EX: 3258,45, FICA DESSA FORMA 3258,00

JÁ REMOVI O CAMPO DA TABELA E CRIEI NOVAMENTO, MAS NÃO RESOLVEU, O ESTRANHO é QUE TENHO OUTROS CAMPOS COMO SALDOANTERIOR, VALORDEBITO QUE TAMBéM ESTÃO COMO DECIMAL(10,2) E FUNCIONA PERFEITAMENTE

O PODE ESTAR OCORRENDO
JOEYRFS 07/12/2012 13:41:06
#415616
Boa tarde.
Em qual banco vc está tentando salvar ? SQL ?

CONVERT(DECIMAL(10,2),VarSaldo)
JESUEL.OLIVEIRA 08/12/2012 11:20:07
#415646
troque Virgula por Ponto,
NILSONTRES 08/12/2012 14:39:26
#415652
Em cima do que escreveu o JESUEL, Segue função para formatar, não só decimal moeda como outras coisas

Public Function Format_Valor(ByVal VVALOR As String, ByVal VTIPO As Integer) As String
Format_Valor = VVALOR
Select Case VTIPO
Case 1 [ô]MOEDA
Format_Valor = Replace(VVALOR, [Ô].[Ô], [Ô][Ô])
Format_Valor = Replace(Format_Valor, [Ô],[Ô], [Ô].[Ô])
Case 2 [ô]CNPJ
Format_Valor = Replace(VVALOR, [Ô].[Ô], [Ô][Ô])
Format_Valor = Replace(Format_Valor, [Ô]/[Ô], [Ô][Ô])
Format_Valor = Replace(Format_Valor, [Ô]-[Ô], [Ô][Ô])
Case 3 [ô]CEP
Format_Valor = Replace(VVALOR, [Ô]-[Ô], [Ô][Ô])
Case 4 [ô]FONE
Format_Valor = Replace(VVALOR, [Ô]([Ô], [Ô][Ô])
Format_Valor = Replace(VVALOR, [Ô])[Ô], [Ô][Ô])
Format_Valor = Replace(Format_Valor, [Ô]-[Ô], [Ô][Ô])
Case 5 [ô]APOSTROFE
Format_Valor = Replace(Format_Valor, [Ô][ô][Ô], [Ô][ô][ô][Ô])
End Select

End Function

Aqui chamo a função para formatar moeda.
Format_Valor(TXT_CUSTO.Text, 1)
Tópico encerrado , respostas não são mais permitidas
Voltar