Retorna os números contidos em uma cadeia como um valor numérico do tipo apropriado.
Sintaxe
val(string)
O argumento de cadeia de caracteresnecessário é qualquer expressão de cadeia de caracteres válida.
Comentários
A função Val para de ler a cadeia de caracteres no primeiro caractere que não consegue reconhecer como parte de um número. Símbolos e caracteres que geralmente são 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 da base (para octal) e &H (para hexadecimal). Os caracteres em branco, as guias e os caracteres de alimentação de linha são removidos do argumento.
O seguinte retorna 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")
Observação
A função Val reconhece apenas o ponto (.) como um separador decimal válido. Quando separadores decimais diferentes são usados, como em aplicativos internacionais, use CDbl em vez disso para converter uma cadeia de caracteres em um número.
Exemplo de consulta
| Expressão. | Resultados |
|---|---|
| SELECT DateofSale,val(DateofSale) AS testVal FROM ProductSales; | Retorna os valores de "DateofSale" e os caracteres numéricos iniciais dos valores do campo "DateofSale" na coluna testVal. Val() deixará de ler a cadeia de caracteres no primeiro caractere não numérico. |
Exemplo de VBA
Observação
Os exemplos a seguir demonstram o uso dessa função em um módulo do Visual Basic for Applications (VBA). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência do desenvolvedor na lista suspensa ao lado de Pesquisar e insira um ou mais termos na caixa de pesquisa.
Este exemplo usa a função Val para retornar os números contidos em uma cadeia de caracteres.
Dim MyValue
MyValue = Val("2457") ' Returns 2457.
MyValue = Val(" 2 45 7") ' Returns 2457.
MyValue = Val("24 and 57") ' Returns 24.