Determine the first two lines of the new file created by the code below Solution
1. Determine the first two lines of the new file created by the code below. This exercise refers to the file Justices.txt that contains data about the Supreme Court justices, past and present. Each record contains six fields – first name, last name, appointing president, home state, year appointed, and year they left the court. If they are still on the court, the last field is set to 0. The first two lines of the file are as follows: Samuel, Alito, George W. Bush, NJ, 2006, 0 Henry, Baldwin, Andrew Jackson, PA, 1844 Dim query = From line Int IO.File.ReadAllLines(“Justices.txt”) Let data = line.Split(“,”C) Let firstName = data(0) Let lastName = data(1) Let fullName = firstName & “ “ & lastName Let state = data(3) Select fullName & “’” & state IO.File.WriteAllLines(“NewFile.txt”, query) 2. Describe the new file created by the code. Dim query = From line In IO.File.ReadAllLines(“Justices.txt”) Let data = line.Split(“,”c) Let firstName = data(0) Let lastName = data(1) Let state = data(3) Let yrAppointed = CInt(data(4)) Let fullName = firstName & “ “ & lastName Let newLine = state & “, “ & fullName Where (yrAppointed = 1990) And (yrAppointed < 2000) Order By yrAppointed Select newline IO.File.WriteAllLines(“NewFile.txt”, query) 3. Determine the output displayed in the text box when the button is clicked. Private Sub btnDisplay_Click(…) Handles btnDisplay.Click Dim salutation, welcome As String Dim sw As IO.StreamWriter = IO.File.CreateText(“Greetings.txt”) sw.WriteLine(“Hello”) sw.WriteLine(“Aloha”) sw.Close() Dim sr As IO.StreamReader = IO.File.OpenText(“Greetings.txt”) salutation = sr.Readline welcome = sr.Readline sr.Close() txtOutput.Text = welcome End Sub 4. Identify any errors. Assume that the contents of the Greetings.txt file are: Hello Aloha Bon Jour Private Sub btnDisplay_Click(…) Handles btnDisplay.Click Dim name, greeting As String Dim sr As IO.StreamReader = IO.File.OpentText(“Greetings.txt”) name = “NewGreet.txt” Dim sw As IO.StreamWriter = IO.CreateText(“name”) Do Until sr.EndOfStream greeting = sr.Readline sw.Writeline(greeting) Loop sr.Close() sw.Close() End Sub 5. The first two lines of the file AgetAtInaug.txt are George Washington, 57 John Adams, 61 Where each record has two fields – name of president and his age when inaugurated. Create an XML file containing these two records 6. The CSV file Senate.txt contains a record for each member of the 111th U.S. Senate. (The 111th U. S. Senate was installed in 2009.) Each record contains three fields – name, state, and party affiliation. Some records in the files are John McCain, Arizona, R Joseph Lieberman, Connecticut, I Kirsten Gillibrand, New York, D (a) Write a program that uses the file Senate111.txt and creates an XML file containing the same information. (b) Write a program that uses the XML file from part (a) to display the names, states, and party affiliation of all the senators in the DataGridView in order by state. The two senators from each state should be in order by their first names.
You'll get 1 file (44.0KB)