diff options
Diffstat (limited to 'source/text/sbasic/shared/03103200.xhp')
| -rw-r--r-- | source/text/sbasic/shared/03103200.xhp | 16 |
1 files changed, 10 insertions, 6 deletions
diff --git a/source/text/sbasic/shared/03103200.xhp b/source/text/sbasic/shared/03103200.xhp index 1f21efc8f6..e69f906e7d 100644 --- a/source/text/sbasic/shared/03103200.xhp +++ b/source/text/sbasic/shared/03103200.xhp @@ -47,14 +47,18 @@ <paragraph role="paragraph" id="par_id3147242" xml-lang="en-US" l10n="U" oldref="2">Defines the default lower boundary for arrays as 0 or 1.</paragraph> </section> <paragraph role="heading" id="hd_id3150771" xml-lang="en-US" level="2" l10n="U" oldref="3">Syntax:</paragraph> -<paragraph role="paragraph" id="par_id3147573" xml-lang="en-US" l10n="U" oldref="4">Option Base { 0 | 1}</paragraph> +<bascode>
+<paragraph role="bascode" id="par_id3147573" xml-lang="en-US" oldref="4">Option Base { 0 | 1}</paragraph>
+</bascode> <paragraph role="heading" id="hd_id3145315" xml-lang="en-US" level="2" l10n="U" oldref="5">Parameters:</paragraph> <paragraph role="warning" id="par_id3147229" xml-lang="en-US" l10n="U" oldref="6">This statement must be added before the executable program code in a module.</paragraph> <paragraph role="heading" id="hd_id3150870" xml-lang="en-US" level="2" l10n="U" oldref="7">Example:</paragraph> -<paragraph role="paragraph" id="par_id3152921" xml-lang="en-US" l10n="U" oldref="8">option Base 1</paragraph> -<paragraph role="paragraph" id="par_id3153192" xml-lang="en-US" l10n="U" oldref="10">Sub ExampleOptionBase</paragraph> -<paragraph role="paragraph" id="par_id3149561" xml-lang="en-US" l10n="U" oldref="11">Dim sVar(20) As String</paragraph> -<paragraph role="paragraph" id="par_id3153770" xml-lang="en-US" l10n="U" oldref="12">msgbox LBound(sVar())</paragraph> -<paragraph role="paragraph" id="par_id3159153" xml-lang="en-US" l10n="U" oldref="13">end sub</paragraph> +<bascode> +<paragraph role="bascode" localize="false" xml-lang="en-US">Option Base 1</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US">Sub ExampleOptionBase</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> Dim sVar(20) As String</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> MsgBox LBound(sVar())</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph> +</bascode> </body> </helpdocument> |