ThisComponent Statement
བྱ་འགུལ་ཚོ་ཆས་གནས་ངེས་ནས་ཚོ་ཆས་དེའི་གཏོགས་གཤིས་ཀློག་འདོན་དང་བཀོད་སྒྲིག་བྱེད་པར་སྟབས་བེད་བསྐྲུན།
བརྡ་འཕྲོད་
ThisComponent
དཔེ་གཞི་
Sub Main
REM ཡིས་ཡི་གེ་ཐག་གཅོད་ཡིག་ཚགས་ནང་གི་"དཀར་ཆག་"གསར་བརྗེས་བྱའོ་
Dim allindexes, index As Object
allindexes = ThisComponent.getDocumentIndexes()
index = allindexes.getByName("Table of Contents1")
REM ཡིས་དཀར་ཆག་གི་ཁས་ལེན་མིང་དང་གྲངས་ཀ་ 1
index.update()
End Sub