Wann wird denn dieser Code ausgeführt? Bei einem Button-Click?

Bei jeder Eingabe in die Textbox?Bestenfalls hast du eine Textbox und einen Suchbutton. Du gibst etwas in die Textbox ein, und mit einem Click auf den Suchbutton wird dann die Suche angestoßen. Dadurch suchst du nur nach dem was du auch suchen möchtest.

Du suchst ja nachdem was in der Textbox steht. Sag Ihm doch das er erst nach min 3 Zeichen suchen soll.

@patty Lade die Datei genau ein Mal runter und lege den Inhalt in der Klasse lokal ab, sonst wird die Datei bei jedem Test neu geladen.
Was steht denn in der Datei drin?
Was steht in der TextBox drin?

Ein kleiner Tipp am Rande: Vergiss nicht ein Try. Sonst schmiert dir dein Programm ab, wenn der Server oder der Anwender mal nicht am Netz sind. Programme, die Internet benötigen immer auch einmal ohne Internetverbindung testen. Außerdem solltest du eine Meldung ausgeben, wenn nicht genug Zeichen angegeben wurden. Nichts verwirrt einen Nutzer mehr, als ein Programm das kommentarlos den Klick auf den Knopf ignoriert.

Das Problem liegt höchstwahrscheinlich (malwieder) an Option Strict Off.
Schalte Option Strict On, und du wirst sehen, dass .Contains(TextBox1.Text) eigentlich ein SyntaxFehler ist.
Bei Strict Off wandelt VB den Text aber in einen Char um, mit dem Ergebnis, dass die Methode was ganz anneres macht als was du denkst.

Gaaaanz wichtig: Visual Studio - Empfohlene Einstellungen

Na was ist denn das? Unrecherchiert gepostet? Ist ja mal was ganz Neues.
Contains(String)

Gibt einen Wert zurück, der angibt, ob eine angegebene untergeordnete Zeichenfolge in dieser Zeichenfolge vorkommt.

ups! habich was velwechsert.