Bookmark.GoToNext Метод (2007 System)

Статья
11/16/2008

Обновлен: Ноябрь 2007

Возвращает объект Range, ссылающийся на начальное положение следующего элемента или местоположение в элементе управления Bookmark, указанном в аргументе What.

Пространство имен: Microsoft.Office.Tools.Word
Сборка: Microsoft.Office.Tools.Word.v9.0 (в Microsoft.Office.Tools.Word.v9.0.dll)

Синтаксис

'Декларация
Public Function GoToNext ( _
    What As WdGoToItem _
) As Range
'Применение
Dim instance As Bookmark
Dim What As WdGoToItem
Dim returnValue As Range

returnValue = instance.GoToNext(What)

public Range GoToNext(
    WdGoToItem What
)

Параметры

What
Тип: Microsoft.Office.Interop.Word.WdGoToItem
WdGoToItem .

Возвращаемое значение

Тип: Microsoft.Office.Interop.Word.Range
Объект Range, ссылающийся на начальное положение следующего элемента или местоположение в элементе управления Bookmark, указанном в аргументе What.

Заметки

При использовании этого метода с константами wdGoToGrammaticalError, wdGoToProofreadingError или wdGoToSpellingError в возвращаемый объект Range включаются все слова с грамматическими или орфографическими ошибками.

Примеры

В следующем примере кода в документ вставляется текст и элемент управления Bookmark с текстом, после чего к тексту добавляется примечание. В окне сообщения выводятся положения в тексте примечаний, полученные с помощью методов GoToNext и GoToPrevious.

В этом примере демонстрируется настройка уровня документа.

Private Sub BookmarkGoToNext()

    Me.Paragraphs(1).Range.InsertParagraphBefore()
    Me.Paragraphs(1).Range.InsertParagraphBefore()
    Me.Paragraphs(1).Range.Text = "This is the first paragraph."

    Dim Bookmark1 As Microsoft.Office.Tools.Word.Bookmark = _
        Me.Controls.AddBookmark(Me.Paragraphs(2).Range, "Bookmark1")
    Bookmark1.Text = "This is original text of the bookmark."

    Dim commentText As Object = "This is some comment text."
    Me.Paragraphs(1).Range.Comments.Add(Me.Paragraphs(1).Range _
        .Words(4), commentText)
    Bookmark1.Words.First.Comments.Add(Bookmark1.Words.First, _
        commentText)
    Bookmark1.InsertBefore("Text inserted before bookmark. ")
    Bookmark1.InsertAfter(" Text inserted after bookmark.")

    Dim range1 As Word.Range = Bookmark1.GoToNext( _
        Word.WdGoToItem.wdGoToComment)
    Dim range2 As Word.Range = Bookmark1.GoToPrevious( _
        Word.WdGoToItem.wdGoToComment)

    MessageBox.Show("Using GoToNext, the comment is " & _
        "at position " & range1.Start.ToString & vbLf & _
        "Using GoToPrevious, the comment is at position " & _
        range2.Start.ToString)

End Sub

private void BookmarkGoToNext()
{
    this.Paragraphs[1].Range.InsertParagraphBefore();
    this.Paragraphs[1].Range.InsertParagraphBefore();
    this.Paragraphs[1].Range.Text = "This is the first paragraph.";
    Microsoft.Office.Tools.Word.Bookmark bookmark1 =
       this.Controls.AddBookmark(this.Paragraphs[2].Range,
       "bookmark1");
    bookmark1.Text = "This is original text of the bookmark.";

    object commentText = "This is some comment text.";
    this.Paragraphs[1].Range.Comments.Add(this.Paragraphs[1]
        .Range.Words[4], ref commentText);
    bookmark1.Words.First.Comments.Add(bookmark1.Words.First,
        ref commentText);

    bookmark1.InsertBefore("Text inserted before bookmark. ");
    bookmark1.InsertAfter(" Text inserted after bookmark.");

    Word.Range range1 = bookmark1.GoToNext(Word.WdGoToItem.wdGoToComment);
    Word.Range range2 = bookmark1.GoToPrevious(Word.WdGoToItem.wdGoToComment);

    MessageBox.Show("Using GoToNext, the comment is at position " 
        + range1.Start.ToString() + "\n" +
        "Using GoToPrevious, the comment is at position "
        + range2.Start.ToString());
}

Разрешения

Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.

Поделиться через