Dateien eines Ordners in Combobox anzeigen

Hallo, ich habe einen Ordner mit mehreren Unterordnern in denen verschiedene Dateien (.doc, pdf xls usw.) liegen. Nun möchte ich gerne in einer combobox je nach suchbegriff die entsprechenden Dateien welche den suchbegriff enthalten anzeigen lassen wenn möglich auch mit autovervollständigung, also wenn ich a eingebe zeigt er alle Dateien an die ein a enthalten und wenn ich dazu ein b eingebe eben alle Dateien mit den Buchstabenverbindung ab usw. Hat jemand einen Idee wie ich dies machen könnte?

Habe bisher folgendes aber es tut sich nix:


Imports System.IO

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles Button1.Click
Dim dInitPath As DirectoryInfo
Dim lSearchpattern As List(Of String)
Dim lFiles As List(Of FileInfo)
lSearchpattern = New List(Of String)
lSearchpattern.Add("*.doc")
lSearchpattern.Add("*.pdf")
dInitPath = New DirectoryInfo("D:\Test")
lFiles = searchFiles(dInitPath, lSearchpattern)
ComboBox1.Items.Clear()
For Each fiFile As FileInfo In lFiles
ComboBox1.Items.Add(fiFile.FullName)
Next
End Sub

Private Function searchFiles(ByVal dPath As DirectoryInfo, ByVal _
lSearchpattern As List(Of String)) As List(Of FileInfo)
Dim lFiles As List(Of FileInfo) = New List(Of FileInfo)
For Each sPattern As String In lSearchpattern
For Each fiFile As FileInfo In dPath.GetFiles(sPattern)
lFiles.Add(fiFile)
Next
For Each diDir As DirectoryInfo In dPath.GetDirectories()
lFiles.AddRange(searchFiles(diDir, lSearchpattern))
Next
Next
Return lFiles
End Function
End Class