PROBLEMA COM FORMAT DOUBLE
Olá,
Estou com um problema na hora de gerar um layout para impressão, no Active Reports..
eu tenho que colocar um número em formato [Ô]Double[Ô] dentro de uma txtbox, mas quando passo para ela, está sendo convertido para número inteiro...
Ex:
o valor que tenho em [Ô]rsTable([Ô]Issqn[Ô])[Ô] é 11,19823
txtISSQN = format(rsTable([Ô]Issqn[Ô]), [Ô]R$ ##,#0.00[Ô]) >> resultado R$ 11,20
preciso que apareça assim: R$ 11,19
Alguma idéia?
Obrigado.
Estou com um problema na hora de gerar um layout para impressão, no Active Reports..
eu tenho que colocar um número em formato [Ô]Double[Ô] dentro de uma txtbox, mas quando passo para ela, está sendo convertido para número inteiro...
Ex:
o valor que tenho em [Ô]rsTable([Ô]Issqn[Ô])[Ô] é 11,19823
txtISSQN = format(rsTable([Ô]Issqn[Ô]), [Ô]R$ ##,#0.00[Ô]) >> resultado R$ 11,20
preciso que apareça assim: R$ 11,19
Alguma idéia?
Obrigado.
Seria assim:
Pega o valor e multiplica por 100 -> 11,19823 * 100 = 1119,823
Pega apenas a parte inteira deste valor -> 1119
Divide por 100 >> 11,19
Aplica o formato R$ 11,19
Pega o valor e multiplica por 100 -> 11,19823 * 100 = 1119,823
Pega apenas a parte inteira deste valor -> 1119
Divide por 100 >> 11,19
Aplica o formato R$ 11,19
txtISSQN=Format(Int(Text1.Text * 100) / 100, [Ô]R$ ##,#0.00[Ô])
Funcionou, 
Muito obrigado!
Muito obrigado!
Tópico encerrado , respostas não são mais permitidas