CreateObject Function
创建 UNO 对象。在 Windows 上还可以创建 OLE 对象。
此方法创建了一个作为参数传递的类型实例
语法：
oObj = CreateObject( type )
示例：
Type address
Name1 As String
City As String
End Type
Sub main
myaddress = CreateObject("address")
MsgBox IsObject(myaddress)
End Sub