Mi aiutate a trasformare questa funzione in modo che non sia ricorsiva?codice:'Restituisce l'elenco di tutti i controlli contenuti in un altro controllo Public Function GetChildControls(ByVal container As Control, ByVal type As Type) As ArrayList Dim result As New ArrayList For Each ctrl As Control In container.Controls 'aggiunge il controllo di tipo cercato al risultato If ctrl.GetType Is type Then result.Add(ctrl) End If 'invoca ricorsivamente questo metodo per aggiungere ache tutti i 'controlli figli result.AddRange(GetChildControls(ctrl, type)) Next Return result End Function

Rispondi quotando