La función Asc( )

Cuando realizamos comparaciones entre cadenas, basadas en los valores binarios de los caracteres, es útil en ocasiones conocer el código de dichos caracteres. 

Para averiguar cuál es el código correspondiente a un determinado carácter, el lenguaje nos proporciona la función Asc( ). Esta función recibe como parámetro una cadena, y devuelve un valor numérico de tipo Integer, con el código correspondiente al primer carácter de la cadena. El Código fuente 70 nos muestra algunos ejemplos.

Dim CodigoCar As Integer
CodigoCar = Asc("A") ' devuelve: 65
CodigoCar = Asc("a") ' devuelve: 97
CodigoCar = Asc("M") ' devuelve: 77
CodigoCar = Asc("F") ' devuelve: 70
CodigoCar = Asc("f") ' devuelve: 102
CodigoCar = Asc("hola") ' devuelve: 104

Código fuente 70