LibreOffice 25.2 laguntza
CompatibilityMode() funtzioak exekuzio-garaiko modua kontrolatzen edo kontsultatzen du. Exekuzio-garaiko modua ezarri edo berrezarri ondoren exekutatutako kode guztiari eragiten dio.
Erabili eginbide hau kontuz, adibidez dokumentuak bihurtzeko soilik.
      CompatibilityMode(Optional Enable As Boolean) As Boolean
    CompatibilityMode function always returns the mode that is active after its execution. That is, if called with an argument, it returns the new mode; if called without an argument, it returns the active mode without modifying it.
Enable: Bateragarritasun modu berria ezartzen du edo haren ezarpena ezabatzen du, argumentua presente dagoenean.
CompatibilityMode funtzioa Option VBASupport 1 instrukzioarekin dago erlazionatuta, eta kasu horretan beti True. itzultzen du. Ez dago erlazionatuta Option Compatible konpilatzaile-zuzentarauarekin.
Funtzio horrek honako egoeratan du eragina edo lagundu dezake:
Aldagaien esparrua.
RmDir komandoa VBA moduan exekutatzean. VBA erabiltzean, direktorio hutsak soilik kentzen dira RmDir bidez, eta LibreOffice Basic bidez direktorio bat modu errekurtsiboan kentzen da.
Basic-en Dir komandoaren portaera aldatzean. Dir komandoaren direktorio-banderak (16) esan nahi du LibreOffice Basic-en direktorioak soilik itzuliko direla. VBAn fitxategi normalak eta direktorioak itzultzen dira.
Elkar trukatzen diren Red eta Blue funtzioekin egindako kolore-osagaien kalkulua (Green funtzioa ez da ukitzen).
Hutsik EZ dagoen file:///home/me/Test direktorio bat emanda
      Sub RemoveDir
          MsgBox CompatibilityMode() ' False
      
          CompatibilityMode( True )
          RmDir( "file:///home/me/Test" )
          CompatibilityMode False 
      
          MsgBox CompatibilityMode ' False
      End Sub
   CompatibilityMode( True ) bidez programak errore bat sortzen du, bestela Test direktorioa eta bere eduki guztiak ezabatzen dira.
Dir portaera aldatzea
    Sub VBADirCommand
        CompatibilityMode( Enable := True )   ' Fitxategi normalak ere erakusten ditu
        Entry$ = Dir( "file:///home/me/Tmp/*.*", 16 )
        Total$ = ""
        While Entry$ <> ""
            Total$ = Total$ + Entry$ + Chr$(13)
            Entry$ = Dir
        Wend
        MsgBox Total$
        CompatibilityMode Enable := False ' Direktorioak soilik erakusten ditu
    End Sub