diff options
Diffstat (limited to 'source/text/sbasic/shared/03020205.xhp')
-rw-r--r-- | source/text/sbasic/shared/03020205.xhp | 32 |
1 files changed, 18 insertions, 14 deletions
diff --git a/source/text/sbasic/shared/03020205.xhp b/source/text/sbasic/shared/03020205.xhp index e211faa331..1c2c3725f0 100644 --- a/source/text/sbasic/shared/03020205.xhp +++ b/source/text/sbasic/shared/03020205.xhp @@ -49,7 +49,9 @@ <paragraph role="paragraph" id="par_id3154685" xml-lang="en-US" l10n="U" oldref="2">Writes data to a sequential file.</paragraph> </section> <paragraph role="heading" id="hd_id3150449" xml-lang="en-US" level="2" l10n="U" oldref="3">Syntax:</paragraph> -<paragraph role="code" id="par_id3145785" xml-lang="en-US" l10n="CHG" oldref="4">Write [#FileName], [Expressionlist]<comment>see i61248</comment></paragraph> +<bascode> +<paragraph role="bascode" id="par_id3145785" xml-lang="en-US" l10n="CHG" oldref="4">Write [#FileName], [Expressionlist]<comment>see i61248</comment></paragraph> +</bascode> <paragraph role="heading" id="hd_id3151116" xml-lang="en-US" level="2" l10n="U" oldref="5">Parameters:</paragraph> <paragraph role="paragraph" id="par_id3153728" xml-lang="en-US" l10n="U" oldref="6"> <emph>FileName:</emph> Any numeric expression that contains the file number that was set by the Open statement for the respective file.</paragraph> @@ -61,18 +63,20 @@ <paragraph role="paragraph" id="par_id1002838" xml-lang="en-US" l10n="NEW">Each <emph>Write</emph> statement outputs a line end symbol as last entry.</paragraph> <paragraph role="paragraph" id="par_id6618854" xml-lang="en-US" l10n="NEW">Numbers with decimal delimiters are converted according to the locale settings.</paragraph> <paragraph role="heading" id="hd_id3151073" xml-lang="en-US" level="2" l10n="U" oldref="11">Example:</paragraph> -<paragraph role="code" id="par_id3145252" xml-lang="en-US" l10n="U" oldref="12">Sub ExampleWrite</paragraph> -<paragraph role="code" id="par_id3149958" xml-lang="en-US" l10n="U" oldref="13">Dim iCount As Integer</paragraph> -<paragraph role="code" id="par_id3156284" xml-lang="en-US" l10n="U" oldref="14">Dim sValue As String</paragraph> -<paragraph role="code" id="par_id3145645" xml-lang="en-US" l10n="U" oldref="15">iCount = Freefile</paragraph> -<paragraph role="code" id="par_id3153417" xml-lang="en-US" l10n="U" oldref="16">open "C:\data.txt" for OutPut as iCount</paragraph> -<paragraph role="code" id="par_id3149401" xml-lang="en-US" l10n="U" oldref="17">sValue = "Hamburg"</paragraph> -<paragraph role="code" id="par_id3156275" xml-lang="en-US" l10n="U" oldref="18">Write #iCount,sValue,200</paragraph> -<paragraph role="code" id="par_id3146913" xml-lang="en-US" l10n="U" oldref="19">sValue = "New York"</paragraph> -<paragraph role="code" id="par_id3155064" xml-lang="en-US" l10n="U" oldref="20">Write #iCount,sValue,300</paragraph> -<paragraph role="code" id="par_id3150322" xml-lang="en-US" l10n="U" oldref="21">sValue = "Miami"</paragraph> -<paragraph role="code" id="par_id3155766" xml-lang="en-US" l10n="U" oldref="22">Write #iCount,sValue,450</paragraph> -<paragraph role="code" id="par_id3145643" xml-lang="en-US" l10n="U" oldref="23">close #iCount</paragraph> -<paragraph role="code" id="par_id3150044" xml-lang="en-US" l10n="U" oldref="24">end sub</paragraph> +<bascode> +<paragraph role="bascode" localize="false" xml-lang="en-US">Sub ExampleWrite</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US">Dim iCount As Integer</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US">Dim sValue As String</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> iCount = Freefile</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> Open "C:\data.txt" For Output As iCount</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> sValue = "Hamburg"</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> Write #iCount,sValue,200</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> sValue = "New York"</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> Write #iCount,sValue,300</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> sValue = "Miami"</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> Write #iCount,sValue,450</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> Close #iCount</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph> +</bascode> </body> </helpdocument> |