diff options
Diffstat (limited to 'source/text/sbasic/shared/03132400.xhp')
| -rw-r--r-- | source/text/sbasic/shared/03132400.xhp | 23 |
1 files changed, 14 insertions, 9 deletions
diff --git a/source/text/sbasic/shared/03132400.xhp b/source/text/sbasic/shared/03132400.xhp index c60501d2f8..2f61d1e655 100644 --- a/source/text/sbasic/shared/03132400.xhp +++ b/source/text/sbasic/shared/03132400.xhp @@ -46,15 +46,20 @@ <paragraph role="paragraph" id="par_idN1059F" xml-lang="en-US" l10n="NEW">This method creates instances of the type that is passed as parameter.</paragraph> </section> <paragraph role="heading" id="par_idN105A2" xml-lang="en-US" level="2" l10n="NEW">Syntax:</paragraph> -<paragraph role="paragraph" id="par_idN105A6" xml-lang="en-US" l10n="NEW">oObj = CreateObject( type )</paragraph> +<bascode>
+<paragraph role="bascode" id="par_idN105A6" xml-lang="en-US">oObj = CreateObject( type )</paragraph>
+</bascode> <paragraph role="heading" id="par_idN105A9" xml-lang="en-US" level="2" l10n="NEW">Example:</paragraph> -<paragraph role="code" id="par_idN105AD" xml-lang="en-US" l10n="NEW">Type address</paragraph> -<paragraph role="code" id="par_idN105B0" xml-lang="en-US" l10n="NEW">Name1 as String</paragraph> -<paragraph role="code" id="par_idN105B4" xml-lang="en-US" l10n="NEW">City as String</paragraph> -<paragraph role="code" id="par_idN105B8" xml-lang="en-US" l10n="NEW">End Type</paragraph> -<paragraph role="code" id="par_idN105BB" xml-lang="en-US" l10n="NEW">Sub main</paragraph> -<paragraph role="code" id="par_idN105BE" xml-lang="en-US" l10n="NEW">myaddress = CreateObject("address")</paragraph> -<paragraph role="code" id="par_idN105C2" xml-lang="en-US" l10n="NEW">MsgBox IsObject(myaddress)</paragraph> -<paragraph role="code" id="par_idN105C6" xml-lang="en-US" l10n="NEW">End Sub</paragraph> +<bascode> +<paragraph role="bascode" localize="false" xml-lang="en-US">Type address</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> Name1 As String</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> City As String</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US">End Type</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> </paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US">Sub main</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> myaddress = CreateObject("address")</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US"> MsgBox IsObject(myaddress)</paragraph> +<paragraph role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph> +</bascode> </body> </helpdocument> |