VB6.0编写的 richtext增强型文本编辑器范例，主要是为 RichText 增加修改字体，打印，查询等功能。当“字体”菜单项被点击时 　　Private Sub mnuFont_Click()显示“字体”对话框，使用指定的方法，CommonDialog 控件能够显示下列对话。将RichTextBox1的属性根据“字体”对话框的变化作相应设置，要改变 RichTextBox 控件中的字体特性，可以使用 　　'SelFontName、SelFontSize 和 SelFontColor 属性。

增强型文本编辑器，绿色免安装，简单易用