[VB6] Gestire errore all'interno di un ciclo

[Gumble]

Originariamente inviato da mardok30
Prova a fare un controllo direttamente nel ciclo sull'esistenza del controllo, una cosa del genere:
For Each y In myArr 'myArr contiene dei nomi di controlli
if not (frmMain.Controls(y) Is Nothing) Then
q = q & ", " & frmMain.Controls(y).Text 'genera un errore se il controllo non c'é
else
q = q & ", "
End if
Next

ho provato come dici... ma il controllo is nothing non funziona:

Public Function test()
    If frmMain.Controls("age_of_company") Is Nothing Then 'il problema é che si blocca subito perché non trova il controllo
        MsgBox "age_of_company does not exist"
    Else
        MsgBox "exists"
    End If
End Function

ho sbagliato qls? idee?