IsUnoStruct-funksjon

Returnerer True hvis det gitte objektet er en Uno-struktur.

Syntaks:

IsUnoStruct (Uno type)

Returverdi:

Boolean

Parametre:

Uno type : Et UnoObject

Eksempel:


Sub Main
Dim bIsStruct
'Instantier en tjeneste
Dim oSimpleFileAccess
oSimpleFileAccess = CreateUnoService( "com.sun.star.ucb.SimpleFileAccess" )
bIsStruct = IsUnoStruct( oSimpleFileAccess )
MsgBox bIsStruct ' Vises Usann fordi oSimpleFileAccess IKKE er en struktur
' Instantier en egenskapsstruktur
Dim aProperty As New com.sun.star.beans.Property
bIsStruct = IsUnoStruct( aProperty )
MsgBox bIsStruct ' Viser Sann fordi aProperty er en struktur
bIsStruct = IsUnoStruct( 42 )
MsgBox bIsStruct ' Viser False fordi 42 IKKE er en struct
End Sub