IsUnoStruct Function

Nagbabalik ng True kung ang ibinigay na bagay ay isang Uno struct.

Syntax:

IsUnoStruct( Uno type )

Ibinalik na halaga:

Boolean

Mga Parameter:

Uri ng Uno : Isang UnoObject

Halimbawa:


Sub Main
Dim bIsStruct
' Mag-instantiate ng isang serbisyo
Dim oSimpleFileAccess
oSimpleFileAccess = CreateUnoService( "com.sun.star.ucb.SimpleFileAccess" )
bIsStruct = IsUnoStruct( oSimpleFileAccess )
MsgBox bIsStruct ' Nagpapakita ng Mali dahil ang oSimpleFileAccess ay WALANG struct
' Mag-instantiate ng isang Property struct
Dim aProperty As New com.sun.star.beans.Property
bIsStruct = IsUnoStruct( aProperty )
MsgBox bIsStruct ' Nagpapakita ng Totoo dahil ang aProperty ay isang struct
bIsStruct = IsUnoStruct( 42 )
MsgBox bIsStruct ' Nagpapakita ng Mali dahil ang 42 ay WALANG struct
End Sub