diff options
Diffstat (limited to 'helpcontent2/source/text/sbasic/shared/03090404.xhp')
| -rw-r--r-- | helpcontent2/source/text/sbasic/shared/03090404.xhp | 77 |
1 files changed, 77 insertions, 0 deletions
diff --git a/helpcontent2/source/text/sbasic/shared/03090404.xhp b/helpcontent2/source/text/sbasic/shared/03090404.xhp new file mode 100644 index 000000000..ada8a37a8 --- /dev/null +++ b/helpcontent2/source/text/sbasic/shared/03090404.xhp @@ -0,0 +1,77 @@ +<?xml version="1.0" encoding="UTF-8"?> +<helpdocument version="1.0"> +<!-- + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . +--> + +<meta> + <topic id="textsbasicshared03090404xml" indexer="include" status="PUBLISH"> + <title id="tit" xml-lang="en-US">End Statement</title> + <filename>/text/sbasic/shared/03090404.xhp</filename> + </topic> +</meta> + +<body> + + +<section id="end"> +<bookmark xml-lang="en-US" branch="index" id="bm_id3150771"> + <bookmark_value>End statement</bookmark_value> +</bookmark> + + +<paragraph id="hd_id3150771" role="heading" level="1" xml-lang="en-US"><link href="text/sbasic/shared/03090404.xhp" name="End Statement">End Statement</link></paragraph> +<paragraph id="par_id3153126" role="paragraph" xml-lang="en-US">Ends a procedure or block.</paragraph> +</section> + +<paragraph id="hd_id3147264" role="heading" level="2" xml-lang="en-US">Syntax:</paragraph> +<bascode> +<paragraph id="par_id3148552" role="bascode" localize="false" xml-lang="en-US">End, End Enum, End Function, End If, End Property, End Select, End Sub, End With</paragraph> +</bascode> + +<paragraph id="hd_id3149456" role="heading" level="2" xml-lang="en-US">Parameters:</paragraph> +<paragraph id="par_id3150398" role="paragraph" xml-lang="en-US">Use the End statement as follows:</paragraph> + +<paragraph id="hd_id3154366" role="heading" level="2" xml-lang="en-US">Statement</paragraph> +<paragraph id="par_id3151043" role="paragraph" xml-lang="en-US">End: Is not required, but can be entered anywhere within a procedure to end the program execution.</paragraph> +<paragraph role="paragraph" id="par_id371543799561260">End Enum: Ends an Enum VBA statement</paragraph> +<paragraph id="par_id3145171" role="paragraph" xml-lang="en-US">End Function: Ends a <emph>Function</emph> statement.</paragraph> +<paragraph id="par_id3153192" role="paragraph" xml-lang="en-US">End If: Marks the end of a <emph>If...Then...Else</emph> block.</paragraph> +<paragraph role="paragraph" id="par_id51581259731973" xml-lang="en-US">End Property: Marks the end of a <emph>Property</emph> statement.</paragraph> +<paragraph id="par_id3148451" role="paragraph" xml-lang="en-US">End Select: Marks the end of a <emph>Select Case</emph> block.</paragraph> +<paragraph id="par_id3155131" role="paragraph" xml-lang="en-US">End Sub: Ends a <emph>Sub</emph> statement.</paragraph> +<paragraph role="paragraph" id="par_id811543799601628">End With: Ends a With statement</paragraph> + +<paragraph id="hd_id3146120" role="heading" level="2" xml-lang="en-US">Example:</paragraph> +<bascode> +<paragraph id="par_idm1340746288" role="bascode" localize="false" xml-lang="en-US">Sub ExampleRandomSelect</paragraph> +<paragraph id="par_idm1340745056" role="bascode" localize="false" xml-lang="en-US">Dim iVar As Integer</paragraph> +<paragraph id="par_idm1340743824" role="bascode" localize="false" xml-lang="en-US"> iVar = Int((15 * Rnd) -2)</paragraph> +<paragraph id="par_idm1340742576" role="bascode" localize="false" xml-lang="en-US"> Select Case iVar</paragraph> +<paragraph id="par_idm1340741344" role="bascode" localize="false" xml-lang="en-US"> Case 1 To 5</paragraph> +<paragraph id="par_id3152887" role="bascode" xml-lang="en-US"> Print "Number from 1 to 5"</paragraph> +<paragraph id="par_idm1340738336" role="bascode" localize="false" xml-lang="en-US"> Case 6, 7, 8</paragraph> +<paragraph id="par_id3148618" role="bascode" xml-lang="en-US"> Print "Number from 6 to 8"</paragraph> +<paragraph id="par_idm1340735376" role="bascode" localize="false" xml-lang="en-US"> Case Is > 8 And iVar < 11</paragraph> +<paragraph id="par_id3147436" role="bascode" xml-lang="en-US"> Print "Greater than 8"</paragraph> +<paragraph id="par_idm1340732352" role="bascode" localize="false" xml-lang="en-US"> Case Else</paragraph> +<paragraph id="par_id3150418" role="bascode" xml-lang="en-US"> Print "Outside range 1 to 10"</paragraph> +<paragraph id="par_idm1340729376" role="bascode" localize="false" xml-lang="en-US"> End Select</paragraph> +<paragraph id="par_idm1340728144" role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph> +</bascode> +</body> +</helpdocument> |