error 13

[ebu]

estaba confundida...
el error es el siguiente:

vChildComp = swComp.GetChildren
For i = 0 To UBound(vChildComp)

el vchildcomp es un array donde se carga datos tipo object. aqui viene lo raro; a veces los carga y otras veces no.entonces si no los carga q vaya a un procedimiento llamado sw y si los carga q siga con el bucle for.
he probado las siguientes opciones y me dan los siguientes errores:

vChildComp = swComp.GetChildren
If vChildComp = Empty Then sw
Else 'error de compilacion:else sin if.
For i = 0 To UBound(vChildComp)
...
End if

vChildComp = swComp.GetChildren
Select Case vChildComp
Case Empty 'error 13:no coinciden los tipos
sw
Case Not Empty
For i = 0 To UBound(vChildComp)
....
End select

con el select case se pueden usar object? yo creo q puede dar error x eso.
alguien sabe xq no son validas estas opciones?
gracias de antemano!