Das klingt ziemlich komisch. Ich würde mal versuchen, Body als RichtextItem zu erzeugen, vielleicht hilft's.
Set doc = New NotesDocument(db)
doc.Form = "Memo"
doc.Subject="egal"
Dim rtitem As New NotesRichtexItem (doc, "Body")
Call rtitem.AppendText ("Hallo#meine#tolle#Welt!")
doc.SendTo="Bruce@willis.com""
doc.CopyTo=session.username
Call doc.Send(False)