Can the font size be chaged in lotus script

I have an agent that sends email to users Blackberry after information is updated. Is there a way to make the font size going to the Blackberry smaller. On their screen the font size is to large to fit on the screen on one line.This is the type of information that is sent

woud like to make it a little smaller in font size

Q2 TRI243 RT $1,237.00 $1,556.00+ $319.00

Any ideas?

Thank you in advance

Subject: Rich Text?

I am able to do this for rich text values. If the field you are sending in the agent is rich text, you should not have a problem doing it.

Here’s a string of code i use to it

Dim rt As New NotesRichTextItem(MessageDoc, “EmailsSentTo”)

Dim richStyle As NotesRichTextStyle

Set richStyle = s.CreateRichTextStyle

richStyle.NotesFont = Arial

richStyle.FontSize = 9

Call rt.AppendStyle(richStyle)