Instrukcja Write

Spis treści
Indeks 🔎︎

# Write# Statement

Writes data to a sequential text file with delimiting characters.

Use Print# statement to print data to a sequential text file. Use Put# statement to write data to a binary or a random file.

### Składnia:

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

### Parametry:

fileNum: Any numeric expression that contains the file number that was set by the Open statement for the respective file.

expression list: Variables or expressions that you want to enter in a file, separated by commas.

W przypadku braku listy wyrażeń instrukcja Write dołącza do pliku pustą linię.

Aby dodać listę wyrażeń do nowego lub istniejącego pliku, musi on być otwarty w trybie Output lub Append.

Ciągi, które piszesz są ujęte w cudzysłów i oddzielone przecinkami. Nie musisz wprowadzać ograniczeń na liście ekspresji.

Każda instrukcja Write jako ostatnią pozycję wstawia symbol końca wiersza.

Liczby z separatorami dziesiętnymi są konwertowane zgodnie z ustawieniami lokalnymi.

### Przykład:

      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

Tematy pokrewne

Open Statement

Print# Statement

Put# Statement

Close Statement