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!