variantes GetFiles

Obtener los nombres de archivo

Dim archivos() As String = Directory.GetFiles(dir, "*.txt").Select(Function(c) Path.GetFileName(c)).ToArray

Obtener archivos específicos

Dim rx As Regex = New System.Text.RegularExpressions.Regex("^(FCV|NCV|FDV|BLV)([0-9]{10})([A-Z]+)(.TXT|.txt)$")

Dim archivos() As String = Directory.GetFiles(dir, "*.*").Where(Function(c) rx.IsMatch(Path.GetFileName(c))).ToArray

Obtener archivos específicos2

Dim rx As Regex = New System.Text.RegularExpressions.Regex("^(FCV|NCV|FDV|BLV)([0-9]{10})([A-Z]+)(.TXT|.txt)$")

Dim result() As String = (From v In Directory.GetFiles(dir, "*.*") Where rx.IsMatch(Path.GetFileName(v))).ToArray

^(.+)(.txt|.TXT|.XML)$
^.+$  todos los archivos