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