Podemos usar a função Val para converter explicitamente os dígitos em uma string para um número. Esta função lê a string até encontrar um caractere que não seja um dígito, um espaço, tabulação, quebra de linha, ou um ponto. As sequencias "&O" e "&H" alteram a base do sistema de numeração e finalizam a leitura. Até parar de ler, a função Val converte todos os caracteres em um valor numérico.
Exemplo:
txtValorUnitario.text = 0,2525
If (Val(txtValorUnitario.Text) = "0") Then
MsgBox "Inválido"
...
O resultado seria a mensagem "Inválido", pois a função Val pega desse campo somente o valor 0 e o que estiver depois da vírgula ele ignora.
Uma função que relaciona-se com a Val seria a CDbl.
Se falei algo errado, por favor me corrijam. Obrigado.
Nenhum comentário:
Postar um comentário