Erklæring Write#

Skriver data til en sekventiel fil med afgrænsende tegn.

Brug udtrykket Print# for at skrive data til en sekventiel tekstfil. Brug udtrykket Put# for at skrive data til en binær eller ikke-sekventiel fil.

.

Write [#fileNum] {,|;} expression [, …]

fileNum: Ethvert numerisk udtryk, der indeholder det filnummer, som blev indstillet med erklæringen Open til den relevante fil.

udtryk-liste: Variable eller udtryk, som du vil indsætte i en fil, adskilt af kommaer.

Hvis udtrykslisten bliver undladt, vil udtrykket Write føje en tom linje til filen.

For at tilføje en udtryksliste til en ny eller en eksisterende fil, skal filen være åbnet i tilstanden Output eller Append.

Strenge, som du skriver, omkranses af citationstegn og skilles af kommaer. Du behøver ikke at indtaste disse skilletegn i udtrykslisten.

Hver Skriv sætning sætter et linjeskift som sidste element.

Tal med decimaltegn er konverteret i henhold til lokalitetsindstillingerne.

  Sub ExampleWrite
      Dim iCount As Integer
      Dim sValue As String
      iCount = Freefile
      Open "C:\Users\ThisUser\data.txt" For Output As iCount
      sValue = "Hamburg"
      Write #iCount,sValue,200
      sValue = "New York"
      Write #iCount,sValue,300
      sValue = "Miami"
      Write #iCount,sValue,450
      Close #iCount
  End Sub
  

  Sub ExampleWrite
      Dim iCount As Integer
      Dim sValue As String
      iCount = Freefile
      Open "~/data.txt" For Output As iCount
      sValue = "Hamburg"
      Write #iCount,sValue,200
      sValue = "New York"
      Write #iCount,sValue,300
      sValue = "Miami"
      Write #iCount,sValue,450
      Close #iCount
  End Sub