¿Es posible? Recorrer nombre de archivos VB.Net

[freegirl]

Ejemplo:

Código:

Private Function search(ByVal Directorio As String) As Boolean
        Try
            For Each File As String In IO.Directory.GetFiles(Directorio, txtBusqueda.Text, IO.SearchOption.AllDirectories)
                'aquí pones el código necesario para ir llenando el listbox
            Next
        Catch ex As Exception
            'pon código 
        End Try
    End Function

donde la variable directorio es el directorio dónde buscar
dónde la caja de texto txtBusqueda es el texto a buscar que introduce el usuario. Puede usar * como comodín.