I know how to do it if the Textfile has quotes around
each string and the strings are on seperate lines.

All you have to do is open the file and do a loop of insterting strings into the combobox until the end of file.

Code:
Dim strVal as String

Open "Myfile.txt" for input as #1
  Do While Not EOF(1)
    input #1, strVal
    combo1.additem(strVal)
  Loop
Close #1
[Edited by Megatron on 05-04-2000 at 05:18 PM]