sludos!! estoy usando la siguiente funcion en visual basic.net:
    
Código vb.net:
Ver original- Function EstaArrayVacio(vArray As Variant) As Boolean 
-     On Error Resume Next 
-     EstaArrayVacio  = UBound(- vArray )
-     EstaArrayVacio = Err ' Error 9 (Subscript out of range) 
- End Function 
y me sale este error:   
Código vb.net:
Ver original- Error   1   Un valor de tipo 'Microsoft.VisualBasic.ErrObject' no se puede convertir en 'Boolean'. 
que sera??'