diff options
Diffstat (limited to 'source/text/sbasic/shared/03110100.xhp')
| -rw-r--r-- | source/text/sbasic/shared/03110100.xhp | 30 |
1 files changed, 17 insertions, 13 deletions
diff --git a/source/text/sbasic/shared/03110100.xhp b/source/text/sbasic/shared/03110100.xhp index c59cdbc92a..f046324d63 100644 --- a/source/text/sbasic/shared/03110100.xhp +++ b/source/text/sbasic/shared/03110100.xhp @@ -50,7 +50,9 @@ <paragraph role="paragraph" id="par_id3156042" xml-lang="en-US" l10n="U" oldref="2">Comparison operators compare two expressions. The result is returned as a Boolean expression that determines if the comparison is True (-1) or False (0).</paragraph> </section> <paragraph role="heading" id="hd_id3147291" xml-lang="en-US" level="2" l10n="U" oldref="3">Syntax:</paragraph> -<paragraph role="paragraph" id="par_id3149177" xml-lang="en-US" l10n="U" oldref="4">Result = Expression1 { = | < | > | <= | >= } Expression2</paragraph> +<bascode>
+<paragraph role="bascode" id="par_id3149177" xml-lang="en-US" oldref="4">Result = Expression1 { = | < | > | <= | >= } Expression2</paragraph>
+</bascode> <paragraph role="heading" id="hd_id3145316" xml-lang="en-US" level="2" l10n="U" oldref="5">Parameters:</paragraph> <paragraph role="paragraph" id="par_id3147573" xml-lang="en-US" l10n="U" oldref="6"> <emph>Result:</emph> Boolean expression that specifies the result of the comparison (True, or False)</paragraph> @@ -64,17 +66,19 @@ <paragraph role="paragraph" id="par_id3150400" xml-lang="en-US" l10n="U" oldref="13">>= : Greater than or equal to</paragraph> <paragraph role="paragraph" id="par_id3148797" xml-lang="en-US" l10n="U" oldref="14"><> : Not equal to</paragraph> <paragraph role="heading" id="hd_id3154686" xml-lang="en-US" level="2" l10n="U" oldref="15">Example:</paragraph> -<paragraph role="paragraph" id="par_id3153969" xml-lang="en-US" l10n="U" oldref="16">Sub ExampleUnequal</paragraph> -<paragraph role="paragraph" id="par_id3159151" xml-lang="en-US" l10n="U" oldref="17">DIM sFile As String</paragraph> -<paragraph role="paragraph" id="par_id3154909" xml-lang="en-US" l10n="U" oldref="18">DIM sRoot As String REM ' Root directory for file in and output</paragraph> -<paragraph role="paragraph" id="par_id3150767" xml-lang="en-US" l10n="U" oldref="19">sRoot = "c:\"</paragraph> -<paragraph role="paragraph" id="par_id3154125" xml-lang="en-US" l10n="U" oldref="20">sFile = Dir$( sRoot ,22)</paragraph> -<paragraph role="paragraph" id="par_id3150440" xml-lang="en-US" l10n="U" oldref="21">If sFile <> "" Then</paragraph> -<paragraph role="paragraph" id="par_id3147288" xml-lang="en-US" l10n="U" oldref="22">Do</paragraph> -<paragraph role="paragraph" id="par_id3150010" xml-lang="en-US" l10n="U" oldref="23">Msgbox sFile</paragraph> -<paragraph role="paragraph" id="par_id3153727" xml-lang="en-US" l10n="U" oldref="24">sFile = Dir$</paragraph> -<paragraph role="paragraph" id="par_id3149664" xml-lang="en-US" l10n="U" oldref="25">Loop Until sFile = ""</paragraph> -<paragraph role="paragraph" id="par_id3146986" xml-lang="en-US" l10n="U" oldref="26">End If</paragraph> -<paragraph role="paragraph" id="par_id3153952" xml-lang="en-US" l10n="U" oldref="27">End sub</paragraph> +<bascode> +<paragraph role="bascode" localize="false" xml-lang="en-US">Sub ExampleUnequal</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US">Dim sFile As String</paragraph> +<paragraph role="bascode" id="par_id3154909" xml-lang="en-US" l10n="U" oldref="18">Dim sRoot As String ' Root directory for file in and output</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> sRoot = "c:\"</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> sFile = Dir$( sRoot ,22)</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> If sFile <> "" Then</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> Do</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> MsgBox sFile</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> sFile = Dir$</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> Loop Until sFile = ""</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> End If</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph> +</bascode> </body> </helpdocument> |