eliminar registros vacíos (Nothing) en un array

array = array.Where(Function(x) x IsNot Nothing).ToArray


Dim carpeta_xml() As String
carpeta_xml = carpeta_xml.Where(Function(x) Not String.IsNullOrEmpty(x)).ToArray


fuente

fuente1


fuente2