Use pattern(wildcard) to match directories : FileSystem « Stream File « VB.Net Tutorial

1. VB.Net Tutorial
2. Stream File
3. FileSystem

Imports System.Runtime.Serialization

Public Class Tester
    Public Shared Sub Main
        For Each oneItem As String In My.Computer.FileSystem.GetDirectories("c:\\",FileIO.SearchOption.SearchTopLevelOnly, "*.txt")
            Console.WriteLine("[" & My.Computer.FileSystem.GetName(oneItem) & "]")
        Next oneItem

    End Sub
End Class