Příkaz Write

Obsah
Rejstřík 🔎︎

# Příkaz Write#

Zapíše data do sekvenčního textového souboru s oddělovači znaků.

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

### Syntaxe:

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

### Parametry:

fileNum: Číselný výraz, který obsahuje číslo souboru nastavené pro daný soubor příkazem Open.

seznam expression: Proměnné nebo výrazy, které chcete vložit do souboru, oddělené čárkami.

Je-li vynechán seznam výrazů, příkaz Write připojí do souboru prázdný řádek.

Chcete-li do nového či existujícího souboru přidat výraz, soubor musí být otevřen v režimu Output nebo Append.

Zapisované řetězce se uzavřou uvozovkami a oddělí čárkami. Tyto oddělovače nemusíte do seznamu výrazů uvádět.

Každý příkaz Write vypíše jako poslední záznam symbol konce řádku.

Čísla s desetinným oddělovačem se převedou podle národního prostředí.

### Příklad:

      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

Související témata

Příkaz Open

Příkaz Print#

Příkaz Put#

Příkaz Close