OK, now we know where to go. Look into the instr() function. It will look thru string A to see if string B is contained in A. Using the code you posted:
InFile = FreeFile
sFile = txtFile.Text
Open sFile For Input As InFile
'' Open the output file to hold the edited data
While Not EOF(InFile)
Line Input #InFile, sTemp
'' here use the instr() function to see if you should output
'' the line to a second file. If so, output the line.
Wend
Close InFile
Close OutFile