Okay, you're wanting to remove some of the data (the stuff you put into quotes) and put the rest of the data into a huge combobox, right?
First I'd load the entire text file into a string. This is the code I normally use to do that:
CODE
Dim iFile As Long
Dim sFilename As String
Dim TheData as String
sFilename = "C:\....."
iFile = FreeFile
Open sFilename For Input As #iFile
TheData = Input$(LOF(iFile), #iFile)
Close #iFile
Once the text file is in the string you can search through it and extract the data you want removed.
After all the bad data is removed you can just put the rest into the combo boxes. That's what you want right?
Tell me what you want to happen exactly and give me your best attempt.
This post has been edited by Zhalix: 11 May, 2008 - 03:22 AM