Содержимое

# IsUnoStruct Function

Возвращает значение True, если данный объект является структурой Uno.

### Синтаксис:

IsUnoStruct( Тип_Uno )

### Return type:

Boolean

### Параметры:

Тип_Uno. UnoObject

### Пример:

    Sub Main
    Dim bIsStruct
    ' Создание службы
    Dim oSimpleFileAccess
    oSimpleFileAccess = CreateUnoService( "com.sun.star.ucb.SimpleFileAccess" )
    bIsStruct = IsUnoStruct( oSimpleFileAccess )
    MsgBox bIsStruct ' Отображает ЛОЖЬ, поскольку oSimpleFileAccess НЕ является структурой
    ' Создание структуры свойства
    Dim aProperty As New com.sun.star.beans.Property
    bIsStruct = IsUnoStruct( aProperty )
    MsgBox bIsStruct ' Отображает True, поскольку aProperty является структурой
    bIsStruct = IsUnoStruct( 42 )
    MsgBox bIsStruct ' Отображает False, поскольку 42 НЕ является структурой
    End Sub

Пожалуйста, поддержите нас!