forked from amazingfate/help
Patch contributed by Oliver Rainer-Wittmann
i#118572 - remove ui string and help content regarding
usage of Java Mail in Writer's Mail Merge as Java
Mail is not used.
http://svn.apache.org/viewvc?view=revision&revision=1197035
Patches contributed by Herbert Duerr
updated help text for regexp word boundaries
http://svn.apache.org/viewvc?view=revision&revision=1228026
improved help text for word boundary regexp expression \b
http://svn.apache.org/viewvc?view=revision&revision=1234738
Patches contributed by Jurgen Schmidt
remove onlineregistration with dependencies
http://svn.apache.org/viewvc?view=revision&revision=1240245
Patch contributed by Regina Henschel
Extended tips for corner and cap style
http://svn.apache.org/viewvc?view=revision&revision=1242287
* re-enable on-line update help, remove obsolete on-line purchasing.
85 lines
6.1 KiB
XML
85 lines
6.1 KiB
XML
<?xml version="1.0" encoding="UTF-8"?>
|
|
|
|
|
|
<!--
|
|
* 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 .
|
|
-->
|
|
|
|
<helpdocument version="1.0">
|
|
<meta>
|
|
<topic id="textsbasicshared03090406xml" indexer="include" status="PUBLISH">
|
|
<title id="tit" xml-lang="en-US">Function Statement [Runtime]</title>
|
|
<filename>/text/sbasic/shared/03090406.xhp</filename>
|
|
</topic>
|
|
<history>
|
|
<created date="2003-10-31T00:00:00">Sun Microsystems, Inc.</created>
|
|
<lastedited date="2004-08-24T12:12:48">converted from old format - fpe</lastedited>
|
|
</history>
|
|
</meta>
|
|
<body>
|
|
<section id="function">
|
|
<bookmark xml-lang="en-US" branch="index" id="bm_id3153346"><bookmark_value>Function statement</bookmark_value>
|
|
</bookmark>
|
|
<paragraph role="heading" id="hd_id3153346" xml-lang="en-US" level="1" l10n="U" oldref="1"><link href="text/sbasic/shared/03090406.xhp" name="Function Statement [Runtime]">Function Statement [Runtime]</link></paragraph>
|
|
<paragraph role="paragraph" id="par_id3159158" xml-lang="en-US" l10n="U" oldref="2">Defines a subroutine that can be used as an expression to determine a return type.</paragraph>
|
|
</section>
|
|
<paragraph role="heading" id="hd_id3145316" xml-lang="en-US" level="2" l10n="U" oldref="3">Syntax</paragraph>
|
|
<paragraph role="paragraph" id="par_id3148944" xml-lang="en-US" l10n="U" oldref="4">see Parameter</paragraph>
|
|
<paragraph role="heading" id="hd_id3154760" xml-lang="en-US" level="2" l10n="U" oldref="5">Parameters:</paragraph>
|
|
<paragraph role="paragraph" id="par_id3156344" xml-lang="en-US" l10n="U" oldref="6">Syntax</paragraph>
|
|
<paragraph role="paragraph" id="par_id3149457" xml-lang="en-US" l10n="U" oldref="7">Function Name[(VarName1 [As Type][, VarName2 [As Type][,...]]]) [As Type]</paragraph>
|
|
<paragraph role="paragraph" id="par_id3153360" xml-lang="en-US" l10n="U" oldref="8">statement block</paragraph>
|
|
<paragraph role="paragraph" id="par_id3148797" xml-lang="en-US" l10n="U" oldref="9">[Exit Function]</paragraph>
|
|
<paragraph role="paragraph" id="par_id3145419" xml-lang="en-US" l10n="U" oldref="10">statement block</paragraph>
|
|
<paragraph role="paragraph" id="par_id3150449" xml-lang="en-US" l10n="U" oldref="11">End Function</paragraph>
|
|
<paragraph role="paragraph" id="par_id3156281" xml-lang="en-US" l10n="U" oldref="12">Parameter</paragraph>
|
|
<paragraph role="paragraph" id="par_id3153193" xml-lang="en-US" l10n="U" oldref="13">
|
|
<emph>Name:</emph> Name of the subroutine to contain the value returned by the function.</paragraph>
|
|
<paragraph role="paragraph" id="par_id3147229" xml-lang="en-US" l10n="U" oldref="14">
|
|
<emph>VarName:</emph> Parameter to be passed to the subroutine.</paragraph>
|
|
<paragraph role="paragraph" id="par_id3147287" xml-lang="en-US" l10n="U" oldref="15">
|
|
<emph>Type:</emph> Type-declaration keyword.</paragraph>
|
|
<paragraph role="heading" id="hd_id3163710" xml-lang="en-US" level="2" l10n="U" oldref="16">Example:</paragraph>
|
|
<bascode>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US">Sub ExampleExit</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US">Dim sReturn As String</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US">Dim sListArray(10) As String</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US">Dim siStep As Single</paragraph>
|
|
<paragraph role="bascode" id="par_id3152939" xml-lang="en-US" l10n="U" oldref="21"> For siStep = 0 To 10 ' Fill array with test data</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US"> sListArray(siStep) = chr$(siStep + 65)</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US"> MsgBox sListArray(siStep)</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US"> Next siStep</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US"> sReturn = LinSearch(sListArray(), "B")</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US"> Print sReturn</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US"> </paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US">Function LinSearch( sList(), sItem As String ) As Integer</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US">Dim iCount As Integer</paragraph>
|
|
<paragraph role="bascode" id="par_id3154943" xml-lang="en-US" l10n="U" oldref="32">' Linsearch searches a TextArray:sList() for a TextEntry:</paragraph>
|
|
<paragraph role="bascode" id="par_id3155601" xml-lang="en-US" l10n="U" oldref="33">' Return value Is the index of the entry Or 0 (Null)</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US"> For iCount=1 To Ubound( sList() )</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US"> If sList( iCount ) = sItem Then</paragraph>
|
|
<paragraph role="bascode" id="par_id3153707" xml-lang="en-US" l10n="U" oldref="36"> Exit For ' sItem found</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US"> End If</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US"> Next iCount</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US"> If iCount = Ubound( sList() ) Then iCount = 0</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US"> LinSearch = iCount</paragraph>
|
|
<paragraph role="bascode" localize="false" xml-lang="en-US">End Function</paragraph>
|
|
</bascode>
|
|
</body>
|
|
</helpdocument>
|