1: 2: 3: 4: 5: 6: 7: 8: 9:
I als ganze Zahl verdunkeln currentRow als Schnur verdunkeln Using myreader als neues FileIO.TextFieldParser („c:\temp\adam.txt ") Während nicht myreader.EndOfData currentRow = myreader.ReadLine () I = i + 1 Beenden während Using beenden