Module
Contents
Index 🔎︎

# IsUnoStruct Function

Trả về Đúng nếu đối tượng đã cho là một cấu trúc Uno.

## Cú pháp:

    IsUnoStruct( Kiểu Uno )

## GIá trị trả về:

Bool

## Tham số :

Kiểu Uno : một UnoObject

## Thí dụ :

    Sub Main

    Dim bIsStruct

    ' Instantiate a service

    Dim oSimpleFileAccess

    oSimpleFileAccess = CreateUnoService( "com.sun.star.ucb.SimpleFileAccess" )

    bIsStruct = IsUnoStruct( oSimpleFileAccess )

    MsgBox bIsStruct ' Displays False because oSimpleFileAccess is NO struct

    ' Instantiate a Property struct

    Dim aProperty As New com.sun.star.beans.Property

    bIsStruct = IsUnoStruct( aProperty )

    MsgBox bIsStruct ' Displays True because aProperty is a struct

    bIsStruct = IsUnoStruct( 42 )

    MsgBox bIsStruct ' Displays False because 42 is NO struct

    End Sub