Funzione IsUnoStruct

Restituisce True se l'oggetto specificato è un costrutto Uno.

Sintassi:

IsUnoStruct( tipo Uno )

Valore restituito:

Bool

Parametri:

Tipo Uno: un UnoObject

Esempio:

Sub Main

Dim bIsStruct

' Crea un servizio

Dim oSimpleFileAccess

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

bIsStruct = IsUnoStruct( oSimpleFileAccess )

MsgBox bIsStruct ' Restituisce False perché oSimpleFileAccess NON è uno struct

' Crea uno struct di tipo Property

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

bIsStruct = IsUnoStruct( aProperty )

MsgBox bIsStruct ' Restituisce True perché aProperty è uno struct

bIsStruct = IsUnoStruct( 42 )

MsgBox bIsStruct ' Restituisce False perché 42 NON è uno struct

End Sub