Właściwość DocumentBase.Lists —
Pobiera Lists kolekcji, która zawiera wszystkich list sformatowanych w dokumencie.
Przestrzeń nazw: Microsoft.Office.Tools.Word
Zestaw: Microsoft.Office.Tools.Word.v4.0.Utilities (w Microsoft.Office.Tools.Word.v4.0.Utilities.dll)
Składnia
'Deklaracja
Public ReadOnly Property Lists As Lists
public Lists Lists { get; }
Wartość właściwości
Typ: Microsoft.Office.Interop.Word.Lists
A Lists kolekcji, która zawiera wszystkich list sformatowanych w dokumencie.
Przykłady
Poniższy kod dodaje tekst do dwóch pierwszych akapitach, stosuje szablon listy do akapitów, a następnie wyświetla komunikat, który zawiera liczbę wykazów w dokumencie.Aby wykorzystać ten przykład, należy uruchomić go z klasy ThisDocument w projekcie na poziomie dokumentu.
Private Sub DocumentLists()
Me.Paragraphs(1).Range.InsertParagraphBefore()
Me.Paragraphs(1).Range.InsertParagraphAfter()
Me.Paragraphs(1).Range.Text = "This is the first paragraph."
Me.Paragraphs(2).Range.Text = "This is the second paragraph."
Dim Start As Object = Me.Paragraphs(1).Range.Start
Dim [End] As Object = Me.Paragraphs(2).Range.End
Dim myRange As Word.Range = Me.Range(Start, [End])
Dim index As Object = 1
Dim myTemplate As Word.ListTemplate = Application.ListGalleries( _
Microsoft.Office.Interop.Word.WdListGalleryType.wdNumberGallery). _
ListTemplates.Item(index)
myRange.ListFormat.ApplyListTemplate(myTemplate)
MessageBox.Show("Total lists in document: " & Me.Lists.Count.ToString())
End Sub
private void DocumentLists()
{
this.Paragraphs[1].Range.InsertParagraphBefore();
this.Paragraphs[1].Range.InsertParagraphAfter();
this.Paragraphs[1].Range.Text = "This is the first paragraph.";
this.Paragraphs[2].Range.Text = "This is the second paragraph.";
object Start = this.Paragraphs[1].Range.Start;
object End = this.Paragraphs[2].Range.End;
Word.Range myRange = this.Range(ref Start,
ref End);
object index = 1;
Word.ListTemplate myTemplate = Application.ListGalleries[Microsoft.Office.Interop.Word.WdListGalleryType.wdNumberGallery].ListTemplates.get_Item(ref index);
myRange.ListFormat.ApplyListTemplate(myTemplate,
ref missing, ref missing, ref missing);
MessageBox.Show ("Total lists in document: " +
this.Lists.Count.ToString());
}
Zabezpieczenia programu .NET Framework
- Pełne zaufanie do bezpośredniego wywołującego. Tego elementu członkowskiego nie można używać w kodzie częściowo zaufanym. Aby uzyskać więcej informacji, zobacz Używanie bibliotek pochodzących z częściowo zaufanego kodu.