Per capire che problema hai dovresti postare la routine di codice che genera l'errore.
E' questa l'istruzione che va in errore ? txtLPiana(k).text = rsDB.fields(2)
Come carichi gli elementi della matrice di controlli ?

Facci sapere.