DocumentRange[] FindAll(
    string textToFind,
    SearchOptions options
)

Function FindAll(
    textToFind As String,
    options As SearchOptions
) As DocumentRange()

DocumentRange[] found = wordProcessor.Document.FindAll("letter", SearchOptions.WholeWord);

Dim found As DocumentRange() = wordProcessor.Document.FindAll("letter", SearchOptions.WholeWord)

RichEditControl richEdit = e.Item.Tag as RichEditControl;
DocumentRange[] buttonWordRanges = richEdit.Document.FindAll("button", SearchOptions.None);
richEdit.Document.Selection = buttonWordRanges[0];

document.BeginUpdate();
DocumentRange[] ranges = document.FindAll(gridView1.FindFilterText, SearchOptions.None);
for (int i = 0; i < ranges.Length; i++) {

// Insert an image from a file.
DocumentRange rangeFound = document.FindAll("Visual Studio Magazine", SearchOptions.CaseSensitive)[0];
DocumentPosition pos = document.Paragraphs[document.Paragraphs.Get(rangeFound.End).Index + 2].Range.Start;

//This modification is added an a new revision:
DocumentRange[] targetPhrases = richEditControl1.Document.FindAll("We measured hard disk space as a function of USB key space on an IBM PC Junior.", SearchOptions.None);
CharacterProperties characterProperties = richEditControl1.Document.BeginUpdateCharacters(targetPhrases[0]);

document.AppendText("A new value of MyBookmarkProperty is obtained from here: NEWVALUE!\n");
document.Bookmarks.Create(document.FindAll("NEWVALUE!", SearchOptions.CaseSensitive)[0], "bmOne");
document.AppendText("\nMyNumericProperty: ");

Dim richEdit As RichEditControl = TryCast(e.Item.Tag, RichEditControl)
Dim buttonWordRanges() As DocumentRange = richEdit.Document.FindAll("button", SearchOptions.None)
richEdit.Document.Selection = buttonWordRanges(0)

document.BeginUpdate()
Dim ranges As DocumentRange() = document.FindAll(gridView1.FindFilterText, SearchOptions.None)
For i As Integer = 0 To ranges.Length - 1

' Insert an image from a file.
Dim rangeFound As DocumentRange = document.FindAll("Visual Studio Magazine", SearchOptions.CaseSensitive)(0)
Dim pos As DocumentPosition = document.Paragraphs(document.Paragraphs.Get(rangeFound.End).Index + 2).Range.Start

'This modification is added an a new revision:
Dim targetPhrases As DocumentRange() = richEditControl1.Document.FindAll("We measured hard disk space as a function of USB key space on an IBM PC Junior.", SearchOptions.None)
Dim characterProperties As CharacterProperties = richEditControl1.Document.BeginUpdateCharacters(targetPhrases(0))

document.AppendText("A new value of MyBookmarkProperty is obtained from here: NEWVALUE!" & Global.Microsoft.VisualBasic.Constants.vbLf)
document.Bookmarks.Create(document.FindAll("NEWVALUE!", DevExpress.XtraRichEdit.API.Native.SearchOptions.CaseSensitive)(0), "bmOne")
document.AppendText(Global.Microsoft.VisualBasic.Constants.vbLf & "MyNumericProperty: ")