En VB, les lettres sont stockées sous forme ASCII et les valeurs ASCII des lettres majuscules et minuscules diffèrent de 32. Dans ce cas, si la valeur ASCII d'une lettre majuscule plus 32 deviendra la lettre minuscule correspondante, et la valeur ASCII de la lettre minuscule moins 32 sera remplacé par des lettres majuscules. Le code source pour réaliser la conversion de cas en VB est le suivant :
'Convertir les lettres majuscules en lettres minuscules
Sous-texte privé1_KeyPress (KeyAscii en entier)
Si KeyAscii >= 65 et KeyAscii <= 90 alors
CléAscii = CléAscii + 32
Fin si
Fin du sous-marin
'Convertir les lettres minuscules en lettres majuscules
Sous-texte privé2_KeyPress (KeyAscii en entier)
Si KeyAscii >= 97 et KeyAscii <= 122 Alors
CléAscii = CléAscii - 32
Fin si
Fin du sous-marin