Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
 Spustite program Microsoft Visual Basic Express a kliknite na tlačidlo " Nový projekt " na karte " Start Page " . Kliknite na " Visual Basic " pod " Nainštalované šablóny " a dvakrát kliknite na " Console Application " na vytvorenie nového projektu konzoly 
 2 
deklarovať nasledujúce menný priestor v vyhláseniach oblasti vášho modulu : . ClipArt
 Imports System.IO 
 3 
 Definujte premenné , ktoré budete používať na čítanie textového súboru 
 
 Dim FilePath As String = " C : . \\ readTextFile.txt " 
 
 Dim lineRead As String = " " 
 
 Dim finalFileData As String = " " 
 4 
 a skontrolujte , či súbor existuje pridaním nasledujúceho kódu : 
 
 Ak System.IO.File.Exists ( FilePath ) = True Then 
 5 
 Pridajte nasledujúci kód na otvorenie textového súboru pre čítanie : 
 
 Dim objReader ako nové System.IO.StreamReader ( FilePath ) 
 6 
 Loop cez dáta a uložiť riadky , ktoré obsahujú čiarky 
 
 robiť , keď objReader.Peek ( ) < > . - 1 
 
 lineRead = objReader.ReadLine ( ) a vbNewLine 
 
 Ak lineRead.Contains ( " , " ) , potom 
 
 finalFileData = finalFileData & lineRead 
 
 Koniec ak 
 
 Loop 
 7 
 skopírujte a vložte nasledujúci kód , ak chcete zobraziť správu , ak súbor nebol nájdený : 
 
 Else 
 
 MsgBox ( " Súbor neexistuje v ceste definovanej . " ) 
 
 End If 
 8 
 Zobraziť čítanie dát zo súboru do okna konzoly pridaním nasledujúceho kódu : 
 
 Console.Write ( finalFileData ) 
 
 Console.ReadLine ( ) 
 9 
 Stlačením tlačidla " F5 " pre spustenie programu . Zobrazené v okne konzoly výsledky by mali byť iba riadky s čiarkami .