Conversion d'une chaîne en valeur numérique

Bonjour, avant tout je précise que je travaille sur Visual Basic 2010 en application console et que je suis débutante.
je souhaite afficher la valeur de chaque lettres (par rapport à son emplacement dans l'alphabet ou son code ASCII)
exemple : si je saisie JOUR, le résultat en nombre serai 10,15,21,18, mais je pense que cela serai compliquer, je ne voit pas comment je pourrais affecter une valeur (ex A=1, B=2 ) pour chacune des lettres, le code serais interminable ?
j'ai donc commencer par faire un essais en utilisant le code ASCII mais j'ai un message d'erreur qui me dit que le résultat est read only (donc si je ne fait pas erreur il ne retourne aucunes valeurs?)
voici mon code:

Public Function convertString(ByVal Mot As String) As String
        Dim Res As String
        For i = 0 To Mot.Length
            Mot(i) = Mot(i).Chr(Asc("A") + 1)
            Mot = Mot(i)<code basic>

Res = Mot

Return Res
Next
End Function</code>
Pourriez-vous m'éclairez afin que je comprenne ou est mon erreur merci.