Assume the file Alphabet.txt contains 26 records, the lowercase letters of the alphabet in ascending order. What happens when the following code is executed?
Dim letter As String
Dim sr As IO.StreamReader = IO.File.OpenText("Alphabet.txt")
Do While Not sr.EndOfStream
Dim sw As IO.StreamWriter = IO.File.CreateText(letter.ToUpper & ".txt") letter = sr.ReadLine
sw.WriteLine(letter.ToUpper & ".txt")
sw.Close
Loop
sr.Close
A) A "too many files open" error is produced.
B) Twenty-six files are created and named with one of the uppercase letters of the alphabet and each containing only its own file name.
C) A file called z is created containing all of the letters of the alphabet in lowercase.
D) An "invalid file name" error is produced.

Question

Assume the file Alphabet.txt contains 26 records, the lowercase letters of the alphabet in ascending order. What happens when the following code is executed? 
 Dim letter As String
 Dim sr As IO.StreamReader = IO.File.OpenText("Alphabet.txt") 
Do While Not sr.EndOfStream 
Dim sw As IO.StreamWriter = IO.File.CreateText(letter.ToUpper & ".txt") letter = sr.ReadLine 
sw.WriteLine(letter.ToUpper & ".txt") 
sw.Close 
Loop 
sr.Close
A) A "too many files open" error is produced.
B) Twenty-six files are created and named with one of the uppercase letters of the alphabet and each containing only its own file name.
C) A file called z is created containing all of the letters of the alphabet in lowercase.
D) An "invalid file name" error is produced.

Quizplus · Accepted Answer

The code opens the file Alphabet.txt and reads each line. For each line, it creates a new file with the name of the letter in uppercase and writes the name of the file to it. This results in the creation of 26 files named A.txt, B.txt, C.txt, ..., Z.txt, each containing only its own file name. The code then closes the files and ends without creating any other files or modifying the original Alphabet.txt file. Therefore, option B is correct. There is no issue of too many files open or invalid file names in this code.

Assume the File Alphabet