Salve a tutti ho scritto questa funzione che crea password casuali di 7 numeri e per essere più sicuro ho anche aggiunto a questa password casuale che viene generata una specie di controcodice ottenuto dividendo per 97 il totale del codice numerico ottenuto.

Se io volessi essere addirittura controllare se un codice è stato già generato come posso controllare la mia funzione?
grazie a tutti

codice:
Function password_casuale() 
  Randomize() 'inizializzo il randomize
  Do Until len(password) = 7 'ciclo di 7 numeri casuali
    numero = Int((9 * Rnd) + 1) 'creo numero casuale tra o e 9
    password = password & numero 'password piano piano diventa tutti i numeri generati
  Loop
  password_mod = password Mod 97 'faccio il mod 97 del totale...
  password_casuale = password & password_mod '... e lo aggiungo alla password precedentemente creata
End Function