Visual Basic/Het werken met komma-bestanden

Het werken met komma-bestanden

Als de gegevens in een bestand wordt gescheiden door komma's, moet je ze op een andere manier lezen en schrijven. Het lezen gebeurt met Input() in plaats van LineInput().

Als voorbeeld schrijven we naam, adres en woonplaats gescheiden door komma's naar een bestand en lezen het daarna weer in.

Start Visual Studio en maak een console-toepassing met de naam console005. Breid de module als volgt uit:

Module module1
  Sub Main()
    Dim bestandsnummer As Integer
    Dim naam, adres, plaats As String
    bestandsnummer = FreeFile()
    OpenFile(bestandsnummer, "D:\console005.txt", OpenMode.Output)
    WriteLine(bestandsnummer, "Janssen,Markt 5,Amsterdam")
    WriteLine(bestandsnummer, "Pietersen,Hoofdweg 12,Eindhoven")
    WriteLine(bestandsnummer, "De Vries" & "," & "Langeweg 1", & "," & "Velden")
    naam = "Vrehen"
    adres = "Veldweg 2"
    plaats = "Arnhem"
    WriteLine(bestandsnummer, naam & "," & adres & "," & plaats)
    FileClose(bestandsnummer)
    bestandsnummer = FreeFile()
    OpenFile(bestandsnummer, "D:\console005.txt", OpenMode.Input)
    Do While Not Eof(bestandsnummer)
      Input(bestandsnummer, naam)
      Input(bestandsnummer, adres)
      Input(bestandsnummer, plaats)
      Console.WriteLine(naam & " - " & adres & " - " & plaats)
    Loop
    FileClose(bestandsnummer)
    Console.ReadLine()
  End Sub
End Module

De uitvoer is:

Janssen - Markt 5 - Amsterdam
Pietersen - Hoofdweg 12 - Eindhoven
De Vries - Langeweg 1 - Velden
Vrehen - Veldweg 2 - Arnhem

Zoals je ziet kun je een regel als één geheel wegschrijven of de strings (of variabelen) gescheiden door komma's samen doorgeven als parameter.