Função empregada
para converter um valor número ou expressão que resulte em um valor número, em
um valor de dupla precisão, contendo quinze casas decimais, utilizando a
seguinte sintaxe:
CSng(Expressão)
Onde,
- Expressão: argumento obrigatório que deve ser avaliada para um valor numérico, entre –3.402823E38 e –1.401298E-45 para valores negativos e entre 1.401298E-45 e 3.402823E38 para valores positivos.
Exemplo: Os próximos exemplos indicam como empregar a função
CSng para converter diversos valores para um valor rel de dupla precisão:
Dim curValor as Currency
Dim sngValor as Single
curValor = 123.4567
sngValor = CSng(curValor) ‘sngValor contém agora um número com 15 casas decimais
Dim sngValor as Single
curValor = 123.4567
sngValor = CSng(curValor) ‘sngValor contém agora um número com 15 casas decimais
Até a Próxima!!
Nenhum comentário:
Postar um comentário