diff options
Diffstat (limited to 'source/text/sbasic/shared/03160000.xhp')
| -rw-r--r-- | source/text/sbasic/shared/03160000.xhp | 77 |
1 files changed, 77 insertions, 0 deletions
diff --git a/source/text/sbasic/shared/03160000.xhp b/source/text/sbasic/shared/03160000.xhp new file mode 100644 index 0000000000..834cb58a7b --- /dev/null +++ b/source/text/sbasic/shared/03160000.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="textsbasicshared03160000xml" indexer="include" status="PUBLISH"> + <title id="tit" xml-lang="en-US">Input Function [Runtime - VBA]</title> + <filename>/text/sbasic/shared/03160000.xhp</filename> + </topic> + </meta> + + <body> + + + <section id="Input"> + <bookmark xml-lang="en-US" branch="index" id="bm_id3150499"> + <bookmark_value>Input function</bookmark_value> + </bookmark> + + + <paragraph id="hd_id3150499" role="heading" level="1" xml-lang="en-US"><link href="text/sbasic/shared/03160000.xhp" name="Input Function [Runtime - VBA]">Input Function [Runtime - VBA]</link></paragraph> + <paragraph id="par_id3151384" role="paragraph" xml-lang="en-US">Returns the open stream of an Input or Binary file (String).</paragraph> + </section> + <embed href="text/sbasic/shared/00000003.xhp#vbasupport"/> + <embed href="text/sbasic/shared/00000003.xhp#functsyntax"/> + <bascode> + <paragraph id="par_id3143267" role="bascode" localize="false" xml-lang="en-US">Input( Number as Integer, [# ] FileNumber as Integer)</paragraph> + </bascode> + <embed href="text/sbasic/shared/00000003.xhp#functvalue"/> + <paragraph id="par_id3150669" role="paragraph" localize="false" xml-lang="en-US">String</paragraph> + <embed href="text/sbasic/shared/00000003.xhp#functparameters"/> + <paragraph id="par_id240720170117391741" role="paragraph" xml-lang="en-US"><emph>Number</emph>: Required. Numeric expression specifying the number of characters to return.</paragraph> + <paragraph id="par_id24072017011739895" role="paragraph" xml-lang="en-US"><emph>#</emph>: Optional.</paragraph> + <paragraph id="par_id240720170117395610" role="paragraph" xml-lang="en-US"><emph>FileNumber</emph>: Required. Any valid file number.</paragraph> + + <embed href="text/sbasic/shared/00000003.xhp#errorcode"/> + <embed href="text/sbasic/shared/00000003.xhp#err6"/> + <embed href="text/sbasic/shared/00000003.xhp#err52"/> + <embed href="text/sbasic/shared/00000003.xhp#err62"/> + <embed href="text/sbasic/shared/00000003.xhp#functexample"/> + <bascode> + <paragraph id="par_id240720170144228912" role="bascode" localize="false" xml-lang="en-US">REM ***** BASIC *****</paragraph> + <paragraph id="par_id240720170144225359" role="bascode" localize="false" xml-lang="en-US">Option VBASupport 1</paragraph> + <paragraph role="bascode" id="par_id371512159801764" xml-lang="en-US" localize="false">Sub Example_Input</paragraph> + <paragraph role="bascode" id="par_id291512159796937" xml-lang="en-US" localize="false"> Dim MyData</paragraph> + <paragraph role="bascode" id="par_id251512159786757" xml-lang="en-US" localize="false"> Open "MyDataFile.txt" For Input As #1</paragraph> + <paragraph role="bascode" id="par_id271512159778620" xml-lang="en-US" localize="false"> Do While Not EOF(1)</paragraph> + <paragraph role="bascode" id="par_id361512159768651" xml-lang="en-US" localize="false"> MyData = Input(1, #1)</paragraph> + <paragraph role="bascode" id="par_id551512159751248" xml-lang="en-US" localize="false"> Print MyData</paragraph> + <paragraph role="bascode" id="par_id321512159745050" xml-lang="en-US" localize="false"> Loop</paragraph> + <paragraph role="bascode" id="par_id61512159730602" xml-lang="en-US" localize="false"> Close #1</paragraph> + <paragraph id="par_id240720170144221275" role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph> + </bascode> + + <section id="relatedtopics"> + <paragraph id="par_id061420170153186192" role="paragraph" xml-lang="en-US"><link href="text/sbasic/shared/03020202.xhp">Input# statement</link></paragraph> + <embed href="text/sbasic/shared/00000003.xhp#VBAIO"/> + </section> +</body> + +</helpdocument> |