Devi utilizzare un algoritmo ricorsivo per ciclare su tutti i file dell'unità e applicargli singolarmente gli attributi con SetAttr.
Per poterti dare informazioni più precise è necessario però che tu specifichi la versione di VB che utilizzi.