LEER Y RECORRER LOS FICHEROS DE UN DIRECTORIO

Dim Files As String(), File As String


Files = IO.Directory.GetFiles(System.AppDomain.CurrentDomain.BaseDirectory & "/DATA", "*.xml")
     
For Each File In Files
     cmbConnect.Items.Add(IO.Path.GetFileNameWithoutExtension(File))
     My.Application.DoEvents()
Next