diff options
Diffstat (limited to 'source/text/sbasic/shared/doEvents.xhp')
-rw-r--r-- | source/text/sbasic/shared/doEvents.xhp | 13 |
1 files changed, 6 insertions, 7 deletions
diff --git a/source/text/sbasic/shared/doEvents.xhp b/source/text/sbasic/shared/doEvents.xhp index 35c3e31957..7a64ade8e3 100644 --- a/source/text/sbasic/shared/doEvents.xhp +++ b/source/text/sbasic/shared/doEvents.xhp @@ -10,17 +10,16 @@ --> <meta> <topic id="org.LibreOffice.Help.DoEvents" indexer="include" status="PUBLISH"> - <title id="tit" xml-lang="en-US">DoEvents Function</title> + <title id="tit">DoEvents Function</title> <filename>/text/sbasic/shared/doEvents.xhp</filename> </topic> </meta> <body> <section id="doEvents"> - <bookmark branch="index" xml-lang="en-US" id="N0089"> + <bookmark branch="index" id="N0089"> <bookmark_value>DoEvents function</bookmark_value> </bookmark> - <bookmark id="bm_id341544551916349" xml-lang="en-US" branch="hid/zzzz" localize="false"/> <h1 id="hd_id401544551916353"><link href="text/sbasic/shared/doEvents.xhp">DoEvents Function</link></h1> <paragraph role="paragraph" id="N0091">Transfers control to the operating system during macro execution, so that it can process the events in waiting.</paragraph> <note id="par_id511668006240908"><literal>DoEvents</literal> provides compatibility with VBA. It always returns 0. Using it in %PRODUCTNAME is not necessary.</note> @@ -28,14 +27,14 @@ <embed href="text/sbasic/shared/00000003.xhp#functsyntax"/> <bascode> <paragraph role="bascode" id="N0092" localize="false">[Call] DoEvents[()] As Integer</paragraph> - </bascode> + </bascode> <embed href="text/sbasic/shared/00000003.xhp#functexample"/> - <paragraph role="paragraph" id="par_id481668421225965" xml-lang="en-US">Both examples set a progressive counter on the first cell of a newly opened Calc document.</paragraph> + <paragraph role="paragraph" id="par_id481668421225965">Both examples set a progressive counter on the first cell of a newly opened Calc document.</paragraph> <bascode> <paragraph role="bascode" id="bas_id321668008155736" localize="false">Sub DoEventsExample</paragraph> <paragraph role="bascode" id="bas_id971668008155959" localize="false"> Dim i As Long, sheet As Object, cell As Object</paragraph> - <paragraph role="bascode" id="bas_id441668008156303" xml-lang="en-US"> sheet = ThisComponent.Sheets.getByIndex(0) ' sheet 1</paragraph> - <paragraph role="bascode" id="bas_id316680008156501" xml-lang="en-US"> cell = sheet.getCellByPosition(0,0) ' cell A1</paragraph> + <paragraph role="bascode" id="bas_id441668008156303"> sheet = ThisComponent.Sheets.getByIndex(0) ' sheet 1</paragraph> + <paragraph role="bascode" id="bas_id316680008156501"> cell = sheet.getCellByPosition(0,0) ' cell A1</paragraph> <paragraph role="bascode" id="bas_id816680081560679" localize="false"> For i = 1 To 20000</paragraph> <paragraph role="bascode" id="bas_id421668008156870" localize="false"> cell.setString(Str(i))</paragraph> <paragraph role="bascode" id="bas_id121668008157054" localize="false"> DoEvents</paragraph> |