CreateObject Function

UNO āĻŦāĻ¸ā§āϤ⧁ āϤ⧈āϰāĻŋ āĻ•āϰāĻž āĻšā§ŸāĨ¤ āωāχāĻ¨ā§āĻĄā§‹āĻœā§‡āĻ“, OLE āĻ…āĻŦāĻœā§‡āĻ•ā§āϟ āϤ⧈āϰāĻŋ āĻ•āϰāĻž āϝāĻžā§ŸāĨ¤

āĻāχ āĻŽā§‡āĻĨāĻĄāϟāĻŋ āĻāĻ•āϟāĻŋ āϧāϰāύ⧇āϰ āϜāĻ¨ā§āϝ āĻĻ⧃āĻˇā§āϟāĻžāĻ¨ā§āϤ āϤ⧈āϰāĻŋ āĻ•āϰ⧇ āϝāĻž āĻĒā§āϝāĻžāϰāĻžāĻŽāĻŋāϟāĻžāϰ āĻšāĻŋāϏ⧇āĻŦ⧇ āĻĒāĻžāϏ āĻ•āϰāĻž āĻšāϝāĻŧāĨ¤

āϏāĻŋāύāĻŸā§āϝāĻžāĻ•ā§āϏ:

oObj = CreateObject( type )

āωāĻĻāĻžāĻšāϰāĻŖ:

Type address

    Name1 As String

    City As String

End Type

 

Sub main

    myaddress = CreateObject("address")

    MsgBox IsObject(myaddress)

End Sub