CreateUnoStruct Function
         Создаёт экземпляр типа структуры Uno.
     
     
     oStruct = CreateUnoStruct( имя типа Uno )
     
     
         oStruct = CreateUnoStruct( "com.sun.star.beans.Property" )
     
Or use the following structure for your statement:
     
         Dim oStruct as new com.sun.star.beans.Property