构造Font对象，整体赋给控件的Font属性
"Me.RichTextBox1.SelectionFont=NewFont("宋体",14.25!,FontStyle.BoldOrFontStyle.Italic)"
