Nápověda LibreOffice 7.2
Zapíše data do sekvenčního textového souboru s oddělovači znaků.
Write [#fileNum] {,|;} expression [, …]
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í.
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