Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Kliknite na príkaz v ponuke " Súbor " v " Open " , potom prejdite na a dvakrát kliknite na súbor , ktorého štýl chcete vypísať . Word otvorí súbor .
2
Kliknite na príkaz na " Developer " kartu je " Visual Basic " , potom vložte nasledujúci fragment programu do okna v strede obrazovky . Tento fragment prechádza jednotlivé štýly v aktuálnom dokumente . Word ukladá tieto štýly vo virtuálnom objektu s názvom " štýly " , ktorý je súčasťou " ActiveDocument " virtuálneho objektu .
Public Sub showStyles2 ( )
Dim instring , outstring , s , i , pos
s = " "
i = 1 až ActiveDocument.Styles.Count
Next i
Documents.Add
ActiveDocument.Content = s
End Sub
3
Vložte nasledovné vyhlásenie po " Z " i vyhlásenie uvedené v predchádzajúcom kroku . Tieto nové príkazy si základné štýl súčasného štýlu , a zaznamenajte základný štýl v reťazci, ak tento štýl je už v reťazci . Každý štýl v " Štýly " kolekcia má svoj vlastný názov . Avšak , to meno je len krycie meno . Skutočný názov štýlu je v " BaseStyle " majetku .
Instring = ActiveDocument.Styles ( i ) . BaseStyle
outstring = s
pos = Instru ( 1 , outstring , instring )
( pos = 0 ) Then
s = s & instring & " , "
End If
4
Kliknite na niektorý z príkazov v programe , ktorý práve vložili , kliknite na tlačidlo príkaz v ponuke " Run " v " Run " pre spustenie programu . Kliknite na ikonu nového dokumentu programu Word , ktorý sa objavil na paneli úloh systému Windows . Zobrazí sa okno dokumentu a zobrazí názvy štýlov všetkých štýlov v dokumente , ktorý ste otvorili v kroku 1.
5
Stlačením tlačidla " Control " a " P " súčasne vytlačiť odsek názvy štýlov .
Copyright © počítačové znalosti Všetky práva vyhradené