
20/11/2008, 08:58
|
| | Fecha de Ingreso: noviembre-2008
Mensajes: 153
Antigüedad: 16 años, 5 meses Puntos: 0 | |
Respuesta: go to tienes razon.
le he estado dando unas vueltas y he conseguido q me haga lo mismo de esta manera:
Sub nombre(swComp As object)
vChildComp = swComp.GetChildren 'aqui se carga vChildComp q es un object()
For i = 0 To UBound(vChildComp) 'va recorriendo todos los datos del array
Set swChildComp = vChildComp(i)
If swChildComp.IsPatternInstance Then GoTo inicio
'cada vez q se cumpla esta condicion, quiero ignorar ese dato del array x lo q quiero pasar al siguiente dato.para ello go to al mismo procedimiento. esto al final es como un procedimiento recursivo.
...
inicio:
nombre swChildComp
Next i
gracias x tu ayuda y espero q esto tb le pueda servir a alguien! |