No mi dispiace...

ma credo che non sia difficile:

fammi pensare un attimo... ... ...

Potresti utilizzare la funzione RANDOM o RANDOMIZE
(ora non ricordo il nome esatto)
che ti genera dei numeri casuali

ti faccio un esempio totalmente basato sulla logica e non sul VB.

supponiamo che tu utilizzi 4 funzioni random sequenziali
e che ognuna di loro ti genera 2 numeri,

tu li concateni: MIApassword = rnd1 & rnd2 & rnd3 & rnd4

poi ti connetti es: ad un database o volendo anche
ad un file di testo (in cui sono registrate tutte le password).

ed esegui un ciclo loop

dal campo1 all'ultimo campo del Database o file
e controlli se trovi un valore identico a quello contenuto
in MIApassword

"SE LO TROVI"

chiudi la connessione al Database o al file di testo
e con un istruzione GOTO rimandi il flusso del tuo programma
alla riga prima del primo RANDOM (in pratica fai generare una
nuova password).

"SE INVECE NON LO TROVI (quindi MIApassword è univoca)"

registri il nuovo utente nel Database o file txt

e mandi a display l'esito della registrazione.

SEMPLICE NO!!!


P.S. volendo puoi rendere il tutto più professionale
formattando meglio i numeri generati dalle funzioni RANDOM

tipo se esce 12 gli assegni un codice alfanumenrico ecc...

Questa è la mia soluzione prettamente logica
spero che ti possa essere di aiuto.

Ciao