Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Vytvoriť nový štandardné EXE programu Visual Basic . Pridať na schopnosť čítať a spracovávať dáta z externého súboru voľbou " projekt " a " Referencie " . Zaškrtnite políčko vedľa " Microsoft Scripting Runtime " a kliknite na " OK " pre uloženie . To poskytuje programový prístup k Windows API pre prácu so súbormi
2
deklarovať dve premenné : . Jeden ako " FileSystemObject " a druhá ako " TextStream " :
Dim oFSO ako nové Scripting.FileSystemObject
Dim oMyFile ako Scripting.TextStream
ďalšie , otvorte súbor pre čítanie do TextStream .
Set oMyFile = oFSO.OpenTextFile ( názov súboru , ForReading )
tiež deklarovať premennú držať každý riadok TextStream ako " Dim sLineRead ako reťazec . "
3
procesu textový súbor riadok po riadku v slučke písomnej ako " Aj keď to nie je oMyFile.AtEndOfStream . " Nastavte " sLineRead " rovná sa jeden riadok textu z TextStream :
sLineRead = oMyFile.ReadLine
Ak existujú nejaké akcenty obsiahnuté v " sLineRead " , môžete ich nahradiť inú hodnotu pomocou VB je " nahradiť " metódu .
4
Identifikovať prízvuk znak musí byť odstránené . Napríklad , textu obsahujúce " e " môže byť nahradený s " e " pred zobrazením alebo vkladanie dát do databázy :
sLineRead = Nahradiť ( sLineRead , " E " , " e " )
Tento riadok kódu nahradí všetky výskyty " e " s " e " v riadku textu čítať do " sLineRead " bez toho, aby sa zmenila niektorá z pôvodných dát .