IBM Lotus Symphony


Funkcja IsUnoStruct [środowisko wykonawcze]

Jeśli określony obiekt jest strukturą UNO, zwracana jest wartość True (prawda).

Składnia

IsUnoStruct (Typ_UNO)

Zwracana wartość

Wartość boolowska

Parametry

Typ_UNO: Obiekt typu UNO

Przykład

Sub Main

Dim bStruktura

' Utworzenie instancji usługi

Dim oSimpleFileAccess

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

bStruktura = IsUnoStruct( oSimpleFileAccess )

MsgBox bStruktura ' Wyświetla wartość False, ponieważ element oSimpleFileAccess NIE jest strukturą

' Utworzenie instancji struktury Property

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

bStruktura = IsUnoStruct( aProperty )

MsgBox bStruktura ' Wyświetla wartość True, ponieważ element aProperty jest strukturą

bStruktura = IsUnoStruct( 42 )

MsgBox bStruktura ' Wyświetla wartość False, ponieważ wartość 42 NIE jest strukturą

End Sub


Opinia na temat produktu | Dodatkowa dokumentacja | Znaki towarowe