Dateinamen in Combobox

05/11/2007 - 11:17 von Joe | Report spam
Hallo,

ich suche eine Funktion die es ermöglicht Dateinamen aus einem
Verzeichnis auszulesen und diese dann in einer Combobox als Auswahl
zur Verfügung zu stellen.

Vielen Dank
 

Lesen sie die antworten

#1 Mark Doerbandt
05/11/2007 - 12:11 | Warnen spam
Hallo,

Joe:

ich suche eine Funktion die es ermöglicht Dateinamen aus einem
Verzeichnis auszulesen und diese dann in einer Combobox als Auswahl
zur Verfügung zu stellen.



Private Sub cboFiles_DblClick(Cancel As Integer)
' cboFiles hat als Quelle eine Werteliste
fillCombo Me!cboFiles, "C:\Temp\*.*"
End Sub

Private Sub fillCombo(cboTarget As ComboBox, strDir As String)
Dim strFile As String
strFile = Dir(strDir)
While strFile <> ""
cboTarget.AddItem strFile
strFile = Dir()
Wend
End Sub

Ähnliche fragen