How to Add Text to a Rich Text Object

Unlike a text field, where you assign a text string to an object, a Rich Text field requires additional statements using the NotesRichTextItem class. The methods and properties associated with this class enable you to insert text strings and format a Rich Text field.

How It Works

In order to reference a Rich Text field, you must instantiate a NotesRichTextItem object. Then using methods such as AddNewLine and AppendText, you can change the text and appearance of the Rich Text object.

Implementation

To insert text in a new Rich Text field, you must obtain a handle to a document (doc) and create a NotesRichTextItem object. The following will insert a single blank line, the statement "This is a test", and another blank line in a field called ATTACHMENTS. To implement this code, replace ATTACHMENTS with the appropriate Rich Text field name.

Dim s As NotesSession Dim db As NotesDatabase Dim doc As NotesDocument Dim rtitem as NotesRichTextItem Set s = New NotesSession Set db = s.CurrentDatabase Set doc = New NotesDocument (db) Set rtitem = New NotesRichTextItem(doc, "ATTACHMENTS") Call rtitem.AddNewLine(1) Call rtitem.AppendText("This is a test") Call rtitem.AddNewLine(1)