CreateObject Function
    创建 UNO 对象。在 Windows 上还可以创建 OLE 对象。
    此方法创建了一个参数指定类型的实例。
  
  
  
    oObj = CreateObject(type)
  
  
  type: the type of the object to be created, as a string.
  
  
    Type address
        Name1 As String
        City As String
    End Type
     
    Sub main
        myaddress = CreateObject("address")
        MsgBox IsObject(myaddress)
    End Sub