Devolve os números contidos numa cadeia como um valor numérico de um tipo determinado.
Sintaxe
Val(cadeia)
O argumento de cadeia necessárioé qualquer expressão de cadeia válida.
Observações
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 carateres em branco, tabulações e avanços de linha são removidos do argumento.
O seguinte devolve o valor 1615198:
Val(" 1615 198th Street N.E.")
No código abaixo, Val retorna o valor decimal -1 para o valor hexadecimal mostrado:
Val("&HFFFF")
Nota
A função Val reconhece apenas o ponto final (.) como um separador decimal válido. Quando diferentes separadores decimais são usados, como em aplicativos internacionais, use CDbl em vez de converter uma cadeia de caracteres em um 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 à esquerda dos valores do campo "DateofSale" na coluna testVal. Val() irá parar de ler a cadeia no primeiro caráter não numérico. |
Exemplo do VBA
Nota
Os exemplos seguintes demonstram a utilização desta função no módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência para Programadores 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.