ຟັງຊັນ CreateObject

ສ້າງວັດຖຸ UNO. ໃນ Windows ຍັງສາມາດສ້າງວັດຖຸ OLE ໄດ້.

ເມທອດນີ້ສ້າງອິນສະແຕນຊ໌ຂອງປະເພດທີ່ສົ່ງມາເປັນພາລາມິເຕີ.

oObj = CreateObject(type)

type: ປະເພດຂອງວັດຖຸທີ່ຈະສ້າງ, ເປັນຂໍ້ຄວາມ.

    Type address
        Name1 As String
        City As String
    End Type
     
    Sub main
        myaddress = CreateObject("address")
        MsgBox IsObject(myaddress)
    End Sub