IsUnoStruct Function

True (igaz) értéket ad vissza, ha a megadott objektum egy Uno-struktúra.

Szintaxis:

IsUnoStruct( Uno-tĂ­pus )

Visszatérési érték:

Bool (logikai)

Paraméterek:

Uno-tĂ­pus: Egy Uno-objektum

PĂ©lda:

Sub Main

Dim bIsStruct

' Szolgáltatáspéldány létrehozása

Dim oSimpleFileAccess

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

bIsStruct = IsUnoStruct( oSimpleFileAccess )

MsgBox bIsStruct ' False (hamis) értéket jelenít meg, mert az oSimpleFileAccess NEM struktúra

' Property struktúrapéldány létrehozása

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

bIsStruct = IsUnoStruct( aProperty )

MsgBox bIsStruct ' True (igaz) értéket jelenít meg, mert az aProperty struktúra

bIsStruct = IsUnoStruct( 42 )

MsgBox bIsStruct ' False (hamis) értéket jelenít meg, mert a 42 NEM struktúra

End Sub