Vraag : Hoe te om „Variabele te vermijden wordt gebruikt alvorens het een waarde.“ is toegewezen

De code leidt hieronder tot een Bericht van de Waarschuwing over veranderlijk i.

The- bericht leest… de „Waarschuwing Veranderlijke „I“ wordt gebruikt alvorens het een waarde is toegewezen. Een ongeldige verwijzingsuitzondering kon bij runtime.

.......................

Using MyReader als Nieuwe Microsoft.VisualBasic.FileIO.TextFieldParser („ c:\myvbast ext \ listoffilesandpaths.txt“)
voortvloeien MyReader.TextFieldType = Microsoft.VisualBasic.FileIO.FieldType. Delimited
MyReader.Delimiters = Nieuw Koord () {“, „}/> Schemerige currentRow
terwijl niet MyReader.EndOfData
currentRow = MyReader.ReadFields ()
i += 1
Nicknam (I) = currentRow (0)
NameOfFile (I) = currentRow (1)
PathOfFile (I) = currentRow (2)
ExtensionOfFile (I) = currentRow (3 die)
LengthOfRecords (I) = currentRow (4)/> het Eind Using

....................

But van While
wat I ben wordt verondersteld om doen deze Waarschuwing vermijden? />If I gebruik


So, hoe hierboven zou moeten ik de code herschrijven om al deze dingen te vermijden verberg?

Thank you.

Antwoord : Hoe te om „Variabele te vermijden wordt gebruikt alvorens het een waarde.“ is toegewezen

Gebruik verschillende varaiable in het gebruikende blok:
Ik denk u de code als dit hebt:

Schemerige I als geheel

Het gebruiken van MyReader als Nieuwe Microsoft.VisualBasic.FileIO.TextFieldParser („c:\myvbastext\listoffilesandpaths.txt“)
             MyReader.TextFieldType = Microsoft.VisualBasic.FileIO.FieldType.Delimited
             MyReader.Delimiters = Nieuw Koord () {„,“}
           Schemerige currentRow als Koord ()
           Terwijl niet MyReader.EndOfData
                 currentRow = MyReader.ReadFields ()
               i += 1
                 Nicknam (I) = currentRow (0)
                NameOfFile (I) = currentRow (1)
               PathOfFile (I) = currentRow (2)
                ExtensionOfFile (I) = currentRow (3)
                 LengthOfRecords (I) = currentRow (4)
           Eind terwijl
        Het Gebruiken van het eind

Zo kunt u als dit doen:

Schemerige I als geheel

 
Het gebruiken van MyReader als Nieuwe Microsoft.VisualBasic.FileIO.TextFieldParser („c:\myvbastext\listoffilesandpaths.txt“)
           Schemerig j als geheel = 0
             MyReader.TextFieldType = Microsoft.VisualBasic.FileIO.FieldType.Delimited
             MyReader.Delimiters = Nieuw Koord () {„,“}
           Schemerige currentRow als Koord ()
           Terwijl niet MyReader.EndOfData
                 currentRow = MyReader.ReadFields ()
               j += 1
                 Nicknam (I) = currentRow (0)
                NameOfFile (I) = currentRow (1)
               PathOfFile (I) = currentRow (2)
                ExtensionOfFile (I) = currentRow (3)
                 LengthOfRecords (I) = currentRow (4)
           Eind terwijl
        Het Gebruiken van het eind
...................
................. „I“ is toegankelijk hier eveneens zo „j“ is een afzonderlijke variabele u binnen „het gebruiken van“ blok gebruikt.
 ....................
....................
....................

 Aangezien veranderlijke „I“ binnen „het gebruiken van“ blok en buiten „eveneens het gebruiken van“ blok zodat gebruikt verbergt het de waarde binnen „het gebruiken van“ blok.