Devolve os números numa cadeia como um valor numérico do tipo apropriado.
Sintaxe
Val(cadeia)
O argumento (argumento: valor que fornece informações a uma acção, evento, método, propriedade, função ou procedimento.) cadeia obrigatório é qualquer expressão de cadeia (expressão de cadeia: expressão que equivale a uma sequência de caracteres contíguos. Os elementos da expressão podem ser: funções que devolvem uma cadeia ou uma Variante de cadeia (VarType 8); uma cadeia literal, uma constante, uma variável ou Variante.) válida.
Observações
A função Val pára a leitura da cadeia no primeiro carácter que não consegue reconhecer como parte de um número. Os símbolos e caracteres que são muitas vezes considerados valores numéricos como, por exemplo, cifrões e vírgulas, não são reconhecidos. No entanto, a função reconhece os prefixos de raiz &O (para octal) e &H (para hexadecimal). Os espaços em branco, tabulações e caracteres de avanço de linha são removidos do argumento.
O seguinte exemplo devolve o valor 1615198:
Val(" 1615 198 Rua N.E.")
No código abaixo, a função Val devolve um valor decimal -1 para o valor hexadecimal mostrado:
Val("&HFFFF")
Nota A função Val reconhece apenas o ponto (.) como um separador decimal válido. Quando forem utilizados separadores decimais diferentes como, por exemplo, em aplicações internacionais, utilize CDup em vez de converter uma cadeia num número.
Exemplo
Nota Os exemplos que se seguem demonstram a utilização desta função num módulo do Visual Basic for Applications (VBA). Para mais informações sobre como trabalhar com VBA, seleccione Referência para Programadores na lista pendente junto a Procurar e introduza um ou mais termos na caixa de procura.
Este exemplo utiliza a função Val para devolver os números numa cadeia.
Dim MeuValor
MeuValor = Val("2457") ' Devolve 2457.
MeuValor = Val(" 2 45 7") ' Devolve 2457.
MeuValor = Val("24 e 57") ' Devolve 24.