diff options
| author | Ilmari Lauhakangas <ilmari.lauhakangas@libreoffice.org> | 2020-11-03 18:54:50 +0200 |
|---|---|---|
| committer | Ilmari Lauhakangas <ilmari.lauhakangas@libreoffice.org> | 2020-11-03 18:07:08 +0100 |
| commit | 9e62afaaebac009fcfee18ef998f0db3baf953b4 (patch) | |
| tree | 6da60558dd4611e864cf68bdae61a3c19c327c34 | |
| parent | 5e05fa7961c2ee91399a4b4b211331555a2b94fe (diff) | |
Fix macro example for While...Wend
Change-Id: I09aa5a76319fb018d429028c88d4ed964f59e8f0
Reviewed-on: https://gerrit.libreoffice.org/c/help/+/105262
Tested-by: Jenkins
Reviewed-by: Ilmari Lauhakangas <ilmari.lauhakangas@libreoffice.org>
| -rw-r--r-- | source/text/sbasic/shared/03090203.xhp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/source/text/sbasic/shared/03090203.xhp b/source/text/sbasic/shared/03090203.xhp index a736753445..dad29dca34 100644 --- a/source/text/sbasic/shared/03090203.xhp +++ b/source/text/sbasic/shared/03090203.xhp @@ -56,7 +56,7 @@ <paragraph role="bascode" id="par_id3155306" xml-lang="en-US"> sText ="This is a short text"</paragraph> <paragraph role="bascode" id="par_id3154011" localize="false"> iRun = 1</paragraph> <paragraph role="bascode" id="par_id3147215" localize="false"> While iRun < Len(sText)</paragraph> - <paragraph role="bascode" id="par_id3147427" localize="false"> If Mid(sText,iRun,1 )<> " " Then Mid( sText ,iRun, 1, Chr( 1 + Asc( Mid(sText,iRun,1 )) )</paragraph> + <paragraph role="bascode" id="par_id3147427" localize="false"> If Mid(sText,iRun,1 )<> " " Then Mid( sText ,iRun, 1) = Chr( 1 + Asc( Mid(sText,iRun,1 )) )</paragraph> <paragraph role="bascode" id="par_id3149665" localize="false"> iRun = iRun + 1</paragraph> <paragraph role="bascode" id="par_id3152939" localize="false"> Wend</paragraph> <paragraph role="bascode" id="par_id3153189" xml-lang="en-US"> MsgBox sText,0,"Text encoded"</paragraph> |