USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  5 zeros decimais no cliente
CSRocha
BRASILIA
DF - BRASIL
ENUNCIADA !
Postada em 30/08/2010 11:01 hs            
Em um sistema que fiz, os relatórios, nas máquinas do cliente, aparecem com 5 zeros decimais (120,00000 em vez de 120,00). Já chequei as configurações regionais e estão com 2 zeros apenas. O que pode ser?

Uso VB 6 SP3, DataReport sem DE para os relatórios. Em minhas máquinas de desenvolvimento e teste está tudo normal, com 2 zeros.

Aguardo alguma ideia.


   
LCRamos
Pontos: 2843
GOIANIA
GO - BRASIL
ENUNCIADA !
Postada em 30/08/2010 11:06 hs            
Você está usando campo numérico, é necessário formatar a saída:

Format$(txtValor.Text, "###,##0.00")
ou
Format$(Format$(txtValor.Text, "###,###,##0.00"), "@@@@@@@@@@@@@@")

vlu//
   
CSRocha
BRASILIA
DF - BRASIL
ENUNCIADA !
Postada em 30/08/2010 13:02 hs            
Olá Ramos, obrigado pela atenção.

Mas veja, estou usando o DataReport, sem DE. Os dados para o report vem de um recordsert. Pelo que sei, não dá para formatar os campos vinculados (já tentei e não aceita). Existe uma maneira para isso, que eu ignore? Tem como manipular os dados do campo no código do Datareport?

Já pensei também - e acho que vou adotar, apesar de me parecer meia sola - em formatar o campo onde estão esses valores como Texto e salvar literalmente o valor formatado. Mas isso me obrigaria a mudar o campo em 3 outras tabelas, que também listam valores.


   
Marciano C.Roch
SÃO ROQUE/SP/BRASIL
SP - BRASIL
ENUNCIADA !
Postada em 31/08/2010 15:17 hs         
e se voce salvar os dados de acordo com a dica do LCRamos,mas acredito que de sim usando os dados de seu recordset com a mesma dica  eu costumo usar assim

string=FormatNumber(BD.Fields!Valor, 2, True, False, True)
   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página