diff options
author | Rafael Lima <rafael.palma.lima@gmail.com> | 2021-07-14 17:38:11 +0200 |
---|---|---|
committer | Jean-Pierre Ledure <jp@ledure.be> | 2021-07-19 08:29:32 +0200 |
commit | ae3eb149da355d5f65b638dcfb5332bd88983f6e (patch) | |
tree | 13c13e1056653e53e5f702202ee251347fea458b /source/text/sbasic/shared/03160000.xhp | |
parent | 8e69592bb5095501ace05f4d231781d1bf420706 (diff) |
Python examples in SF_FileSystem help page
This patch also adds a <variable> tag to 03160000.xhp to enable embedding in the "relatedtopics" section.
Change-Id: I796753e0449fcf0141e5996ed709130716aea53b
Reviewed-on: https://gerrit.libreoffice.org/c/help/+/118914
Tested-by: Jenkins
Tested-by: Jean-Pierre Ledure <jp@ledure.be>
Reviewed-by: Jean-Pierre Ledure <jp@ledure.be>
Diffstat (limited to 'source/text/sbasic/shared/03160000.xhp')
-rw-r--r-- | source/text/sbasic/shared/03160000.xhp | 92 |
1 files changed, 44 insertions, 48 deletions
diff --git a/source/text/sbasic/shared/03160000.xhp b/source/text/sbasic/shared/03160000.xhp index 443b07229c..aa429b1511 100644 --- a/source/text/sbasic/shared/03160000.xhp +++ b/source/text/sbasic/shared/03160000.xhp @@ -1,43 +1,39 @@ <?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 . - --> +<!-- +* 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> +<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> - - - <paragraph id="hd_id3150499" role="heading" level="1" xml-lang="en-US"><link href="text/sbasic/shared/03160000.xhp" name="Input Function [VBA]">Input Function [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"/> +<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> @@ -55,21 +51,21 @@ <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> + <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"> - <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/03020202.xhp#Input_h1"/> <embed href="text/sbasic/shared/00000003.xhp#VBAIO"/> </section> </body> |