Ajuda del LibreOffice 25.8
Prova si un objecte Uno del Basic admet certes interfícies d'Uno.
Torna Cert, si totes les interfícies d'Uno indicades s'admeten, si no, torna Fals.
HasUnoInterfaces( oTest, Uno-Interface-Name 1 [, Uno-Interface-Name 2, ...])
Bool
| Name | Type | Description | 
|---|---|---|
| oTest | Object | the Basic Uno object that you want to test. | 
| Uno-Interface-Name 1,  | String | Uno interface name(s) | 
Sub HasInterface
    Dim bHas as Boolean
    Dim oSheet as Object
    oSheet = ThisComponent.Sheets(0) 
    bHas = HasUnoInterfaces( oSheet, "com.sun.star.beans.XIntrospection" )
    Print bHas ' = True
End Sub