IBM Lotus Symphony


IsUnoStruct-funksjonen [kjøretid]

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

Syntaks:

IsUnoStruct( Uno-type )

Returverdi:

Bool

Parametere:

Uno-type: Et UnoObject

Eksempel:

Sub Main

Dim bIsStruct

' Opprett forekomst for en tjeneste

Dim oSimpleFileAccess

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

bIsStruct = IsUnoStruct( oSimpleFileAccess )

MsgBox bIsStruct ' Viser False fordi oSimpleFileAccess ikke er struct

' Opprett forekomst for en Property-struktur

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

bIsStruct = IsUnoStruct( aProperty )

MsgBox bIsStruct ' Viser True fordi aProperty er en struct

bIsStruct = IsUnoStruct( 42 )

MsgBox bIsStruct ' Viser False fordi 42 ikke er struct

End Sub


Tilbakemelding om produktet | Annen dokumentasjon | Varemerker