Retorna os números contidos em uma cadeia como um valor numérico do tipo apropriado.
Sintaxe
Val(cadeia)
O argumento de cadeianecessário é qualquer expressão de cadeia válida.
Comentários
A função Val deixa de ler a cadeia no primeiro caráter que não consegue reconhecer como parte de um número. Os símbolos e carateres que são frequentemente considerados partes de valores numéricos, como cifrões e vírgulas, não são reconhecidos. No entanto, a função reconhece os prefixos &O radix (para octal) e &H (para hexadecimal). Os espaços em branco, os separadores e os carateres de linefeed são removidos do argumento .
O seguinte devolve o valor 1615198:
Val(" 1615 198th Street N.E.")
No código abaixo, Val devolve o valor decimal -1 para o valor hexadecimal mostrado:
Val("&HFFFF")
Observação
A função Val reconhece apenas o período (.) como um separador decimal válido. Quando são utilizados diferentes separadores decimais, como em aplicações internacionais, utilize o CDbl para converter uma cadeia num número.
Exemplo de consulta
| Expressão. | Resultados |
|---|---|
| SELECT DateofSale,val(DateofSale) AS testVal FROM ProductSales; | Devolva os valores de "DateofSale" e os carateres numéricos principais dos valores do campo "DateofSale" na coluna testVal. Val() deixará de ler a cadeia no primeiro caráter não numérico. |
Exemplo de VBA
Observação
Exemplos que se seguem demonstram a utilização desta função num módulo Visual Basic for Applications (VBA). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência do Programador na lista pendente junto a Procurar e introduza um ou mais termos na caixa de pesquisa.
Este exemplo utiliza a função Val para devolver os números contidos numa cadeia.
Dim MyValue
MyValue = Val("2457") ' Returns 2457.
MyValue = Val(" 2 45 7") ' Returns 2457.
MyValue = Val("24 and 57") ' Returns 24.