IBM Lotus Symphony
|
Käyttää aktiivista komponenttia niin, että sen ominaisuudet voi lukea ja asettaa. ThisComponent-komponenttia käytetään asiakirja- Basicissa. Tässä asiakirjassa komponentti edustaa sitä asiakirjaa, johon Basic kuuluu. ThisComponent-komponentin käyttämän objektin laji vaihtelee asiakirjalajin mukaan.
ThisComponent
Sub Main
REM päivittää tekstiasiakirjan "Sisällysluettelon"
Dim allindexes, index As Object
allindexes = ThisComponent.getDocumentIndexes()
index = allindexes.getByName("Table of Contents1")
REM Käytä Sisällysluettelon oletusnimeä ja arvoa 1
index.update()
End Sub