diff options
| author | Andras Timar <atimar@suse.com> | 2012-11-15 11:10:24 +0100 |
|---|---|---|
| committer | Andras Timar <atimar@suse.com> | 2012-11-15 20:46:51 +0100 |
| commit | ff39701b0e841035089929ab7811c7431ab9b39b (patch) | |
| tree | 03f3607f3ad5c5b788f8932a80c6c847bd90b1ae /source/text/sbasic/shared/03120306.xhp | |
| parent | 6291844ea9c4c1d6863c62cbd33e841ff21d3e7a (diff) | |
format Basic code examples
Diffstat (limited to 'source/text/sbasic/shared/03120306.xhp')
| -rw-r--r-- | source/text/sbasic/shared/03120306.xhp | 28 |
1 files changed, 16 insertions, 12 deletions
diff --git a/source/text/sbasic/shared/03120306.xhp b/source/text/sbasic/shared/03120306.xhp index 7c92a96c03..26b3f0dc15 100644 --- a/source/text/sbasic/shared/03120306.xhp +++ b/source/text/sbasic/shared/03120306.xhp @@ -48,7 +48,9 @@ <paragraph role="paragraph" id="par_id3148473" xml-lang="en-US" l10n="U" oldref="2">Returns the specified portion of a string expression (<emph>Mid function</emph>), or replaces the portion of a string expression with another string (<emph>Mid statement</emph>).</paragraph> </section> <paragraph role="heading" id="hd_id3154285" xml-lang="en-US" level="2" l10n="U" oldref="3">Syntax:</paragraph> -<paragraph role="paragraph" id="par_id3147530" xml-lang="en-US" l10n="CHG" oldref="4">Mid (Text As String, Start As Long [, Length As Long]) or Mid (Text As String, Start As Long , Length As Long, Text As String)</paragraph> +<bascode>
+<paragraph role="bascode" id="par_id3147530" xml-lang="en-US" oldref="4">Mid (Text As String, Start As Long [, Length As Long]) or Mid (Text As String, Start As Long , Length As Long, Text As String)</paragraph>
+</bascode> <paragraph role="heading" id="hd_id3145068" xml-lang="en-US" level="2" l10n="U" oldref="5">Return value:</paragraph> <paragraph role="paragraph" id="par_id3149295" xml-lang="en-US" l10n="U" oldref="6">String (only by Function)</paragraph> <paragraph role="heading" id="hd_id3154347" xml-lang="en-US" level="2" l10n="U" oldref="7">Parameters:</paragraph> @@ -65,16 +67,18 @@ <embed href="text/sbasic/shared/00000003.xhp#errorcode"/> <embed href="text/sbasic/shared/00000003.xhp#err5"/> <paragraph role="heading" id="hd_id3149560" xml-lang="en-US" level="2" l10n="U" oldref="14">Example:</paragraph> -<paragraph role="paragraph" id="par_id3150439" xml-lang="en-US" l10n="U" oldref="15">Sub ExampleUSDate</paragraph> -<paragraph role="paragraph" id="par_id3147349" xml-lang="en-US" l10n="U" oldref="16">Dim sInput As String</paragraph> -<paragraph role="paragraph" id="par_id3155854" xml-lang="en-US" l10n="U" oldref="17">Dim sUS_date As String</paragraph> -<paragraph role="paragraph" id="par_id3153189" xml-lang="en-US" l10n="U" oldref="18">sInput = InputBox("Please input a date in the international format 'YYYY-MM-DD'")</paragraph> -<paragraph role="paragraph" id="par_id3148645" xml-lang="en-US" l10n="U" oldref="19">sUS_date = Mid(sInput, 6, 2)</paragraph> -<paragraph role="paragraph" id="par_id3153952" xml-lang="en-US" l10n="U" oldref="20">sUS_date = sUS_date & "/"</paragraph> -<paragraph role="paragraph" id="par_id3153364" xml-lang="en-US" l10n="U" oldref="21">sUS_date = sUS_date & Right(sInput, 2)</paragraph> -<paragraph role="paragraph" id="par_id3146975" xml-lang="en-US" l10n="U" oldref="22">sUS_date = sUS_date & "/"</paragraph> -<paragraph role="paragraph" id="par_id3149665" xml-lang="en-US" l10n="U" oldref="23">sUS_date = sUS_date & Left(sInput, 4)</paragraph> -<paragraph role="paragraph" id="par_id3150011" xml-lang="en-US" l10n="U" oldref="24">MsgBox sUS_date</paragraph> -<paragraph role="paragraph" id="par_id3148618" xml-lang="en-US" l10n="U" oldref="25">End Sub</paragraph> +<bascode> +<paragraph role="bascode" localize="false" xml-lang="en-US">Sub ExampleUSDate</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US">Dim sInput As String</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US">Dim sUS_date As String</paragraph> +<paragraph role="bascode" id="par_id3153189" xml-lang="en-US" l10n="U" oldref="18"> sInput = InputBox("Please input a date in the international format 'YYYY-MM-DD'")</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> sUS_date = Mid(sInput, 6, 2)</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> sUS_date = sUS_date & "/"</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> sUS_date = sUS_date & Right(sInput, 2)</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> sUS_date = sUS_date & "/"</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> sUS_date = sUS_date & Left(sInput, 4)</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> MsgBox sUS_date</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph> +</bascode> </body> </helpdocument> |