L´idée c´est de recueillir le timer ( qui doit au moins donner la milliseconde) au moment précis où on enfonce une touche ( l´événement KeyDown(KeyCode As Integer, Shift As Integer))
Puis on met ce timer en mémoire
Ensuite, on prend un autre événement en compte, par exemple celui qui pren den compte le remplissage de tout le champ ( AfterUpdate(Cancel As Integer).
En déduisant le micro événement temporel du précédent stocké, cela suffit largement ( multiplié par l´heure du timer par ex) pour générer des nombres considérablement aléatoires.