Fråga : Hur man undviker ”variabel används, för det har tilldelats en värdera.”,

Den nedanföra blytaket för kodifiera till ett Warning meddelande om meddelande för variabel i.

The läser… ”varnande variabel, ”som jag” används, för det har tilldelats en värdera. Ett ogiltigt hänvisar till undantag kunde resultera på

Using MyReader för runtime.

....................... som ny
för Microsoft.VisualBasic.FileIO.TextFieldParser (” c:\myvbast/>ext \ listoffilesandpaths.txt”) MyReader.TextFieldType = Microsoft.VisualBasic.FileIO.FieldType. Delimited
MyReader.Delimiters = nytt stränger () {”, ”}, dunkel currentRow för
som stränger () currentRow för stunder inte MyReader.EndOfData
för
=
i += 1
Nicknam (I) för MyReader.ReadFields () = 0)
NameOfFile (I) för currentRow (= 1)
PathOfFile (I) för currentRow (=
ExtensionOfFile (I) för currentRow (2) = currentRow (3)
LengthOfRecords (I) =
för currentRow (4) avslutar While
avslutar Using

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

But vilken förmiddag mig som är förment som ska göras för att undvika denna varning?

If jag använder dunkelt, för kvarteret - e.g. dunkelt I som heltal = 0 - därefter mig får ett felmeddelande träffande mig, att ”variabeln ”mig” döljer en variabel i en inneslutande block.

So, hur bör mig skriva om kodifiera över för att undvika all dessa saker?

Thank you. " klar "

Svar : Hur man undviker ”variabel används, för det har tilldelats en värdera.”,

Använd ett olikt varaiable i det användande kvarteret:
Funderare I du har kodifieranågot liknande detta:

Dunkelt I som heltal

Using MyReader som ny Microsoft.VisualBasic.FileIO.TextFieldParser (”c:\myvbastext\listoffilesandpaths.txt”)
             MyReader.TextFieldType = Microsoft.VisualBasic.FileIO.FieldType.Delimited
             MyReader.Delimiters = nytt stränger () {”,”},
           Dunkel currentRow som stränger ()
           Stunder inte 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)
           Avsluta stunder
        Avsluta Using

Så du kan göra något liknande detta:

Dunkelt I som heltal

 
Using MyReader som ny Microsoft.VisualBasic.FileIO.TextFieldParser (”c:\myvbastext\listoffilesandpaths.txt”)
           Dunkelt j som heltal = 0
             MyReader.TextFieldType = Microsoft.VisualBasic.FileIO.FieldType.Delimited
             MyReader.Delimiters = nytt stränger () {”,”},
           Dunkel currentRow som stränger ()
           Stunder inte 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)
           Avsluta stunder
        Avsluta Using
...................,
................. ”jag” är tillgänglig här, som ”j” är väl så en separat variabel som du använder inom ”using” kvarter.
 ....................,
....................,
....................,

 Sedan variabeln ”mig” använder insida ”using” kvarteret och yttersidan ”using” kvarter, som den döljer väl så värdera inom ”using” kvarter.