diff options
author | Daniel Baumann <daniel.baumann@progress-linux.org> | 2024-04-07 09:06:44 +0000 |
---|---|---|
committer | Daniel Baumann <daniel.baumann@progress-linux.org> | 2024-04-07 09:06:44 +0000 |
commit | ed5640d8b587fbcfed7dd7967f3de04b37a76f26 (patch) | |
tree | 7a5f7c6c9d02226d7471cb3cc8fbbf631b415303 /helpcontent2/source/text/sbasic/shared/03160000.xhp | |
parent | Initial commit. (diff) | |
download | libreoffice-ed5640d8b587fbcfed7dd7967f3de04b37a76f26.tar.xz libreoffice-ed5640d8b587fbcfed7dd7967f3de04b37a76f26.zip |
Adding upstream version 4:7.4.7.upstream/4%7.4.7upstream
Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
Diffstat (limited to 'helpcontent2/source/text/sbasic/shared/03160000.xhp')
-rw-r--r-- | helpcontent2/source/text/sbasic/shared/03160000.xhp | 73 |
1 files changed, 73 insertions, 0 deletions
diff --git a/helpcontent2/source/text/sbasic/shared/03160000.xhp b/helpcontent2/source/text/sbasic/shared/03160000.xhp new file mode 100644 index 000000000..aa429b151 --- /dev/null +++ b/helpcontent2/source/text/sbasic/shared/03160000.xhp @@ -0,0 +1,73 @@ +<?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 [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> + <h1 id="hd_id141626276767913"><variable id="Input_h1"><link href="text/sbasic/shared/03160000.xhp" name="Input Function [VBA]">Input Function [VBA]</link></variable></h1> + <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 role="bascode" id="par_id240720144228912" localize="false">REM ***** BASIC *****</paragraph> + <paragraph role="bascode" id="par_id240720144225359" localize="false">Option VBASupport 1</paragraph> + <paragraph role="bascode" id="par_id371512159801764" localize="false">Sub Example_Input</paragraph> + <paragraph role="bascode" id="par_id291512159796937" localize="false"> Dim MyData</paragraph> + <paragraph role="bascode" id="par_id251512159786757" localize="false"> Open "MyDataFile.txt" For Input As #1</paragraph> + <paragraph role="bascode" id="par_id271512159778620" localize="false"> Do While Not EOF(1)</paragraph> + <paragraph role="bascode" id="par_id361512159768651" localize="false"> MyData = Input(1, #1)</paragraph> + <paragraph role="bascode" id="par_id551512159751248" localize="false"> Print MyData</paragraph> + <paragraph role="bascode" id="par_id321512159745050" localize="false"> Loop</paragraph> + <paragraph role="bascode" id="par_id615121597830602" localize="false"> Close #1</paragraph> + <paragraph role="bascode" id="par_id240720170221275" localize="false">End Sub</paragraph> + </bascode> + + <section id="relatedtopics"> + <embed href="text/sbasic/shared/03020202.xhp#Input_h1"/> + <embed href="text/sbasic/shared/00000003.xhp#VBAIO"/> + </section> +</body> + +</helpdocument> |