Visual Basic.NET - OBTENER VALOR ASCII DE UN CHAR

Hola
Como puedo obtener el valor ascii de char¿?
Gracias

dim i as integer
i = asc("a")
esto da el valor de cualquier caracter que se le ponga y para hacer lo contrario es
dim cad as string
cad=chr(65)
cad valdra A

asias ;-)