Code:
oControl.Range.Style = = oStyle.NameLocal
Is it a typo of the "= ="?
And,
After running the codes, I discover in the Properties of the Rich Text Controls. The "use a style to format contents" has not been checked, which means if you type anything inside the formatted Rich Text Controls, the newly typed texts won't be as formatted as expected (in this case, not turned red, still auto black).