How can I fill a combox with a list of files (say text files)from a directory.
Thanks in advance.
Printable View
How can I fill a combox with a list of files (say text files)from a directory.
Thanks in advance.
private Sub Command1_Click()
Dim sDir as string
sDir = Dir("C:\Windows\*")
While len(sDir)
Combo1.AddItem sDir
sDir = Dir
Wend
If Combo1.ListCount then Combo1.ListIndex = 0
End Sub
Aaron Young
Analyst Programmer
[email protected]
[email protected]