Função que retorna o código ASCII de um caracter (ou do primeiro caracter da variável).

Exemplo da Rotina:

Asc("A")

Exemplo 1- Pegando o ASCII da letra D e mostrando o resultado:

Asc – Exemplo 1

//Bibliotecas
#Include "Protheus.ch"

/*/{Protheus.doc} zTeste
Função de Teste
@type function
@author Terminal de Informação
@since 13/11/2016
@version 1.0
    @example
    u_zTeste()
/*/

User Function zTeste()
	Local aArea      := GetArea()
	Local cCaracter  := "D"
	Local nAscii     := Asc(cCaracter)

	MsgInfo("O Caracter "+cCaracter+", é o código "+cValToChar(nAscii)+" da tabela ASCII", "Atenção")

	RestArea(aArea)
Return

Exemplo em Vídeo:

Clique nesse link para ver um exemplo em Vídeo da nossa Maratona de Exemplos.

Observações:

– Caso tenha dúvidas ou problemas com os exemplos, entre em contato;
– Se tiver sugestões de rotinas, pode entrar em contato;

Referências:

– TDN
– Universo AdvPL