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