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

Please support us!