You may need to pre-convert the characters/coding before assigning to the text property of your XML nodes. Rich Text in Infopath XML uses XHTML formatting.
A good way to see what Infopath expects to see in a rich text node would be to create a template with a rich text field, populate the form, save it and have a look at the raw XML.
Then replicate the formatting schema with your vbScript XML construction.