RichTextBox 控件提供了一些属性，通过这些属性，可对该控件中任何部分的文本使用不同的格式。用这些属性，可以将文本变为粗体或斜体，改变文本的颜色，创建上标或下标。可以调整段落的左右缩进值，还可以使用悬挂式缩进。怎样才能实现这些功能呢？
    请高手指点！
    谢谢！

RichTextBox1.SelStart= 开始长度
RichTextBox1.SelLength=选区长度
RichTextBox1.SelBold = True ' 选区加粗

比如一篇文章，有一部分要突出显示，就是说这一部分要和其他的部分用不同的字体，怎样实现？
    请给出示例代码。谢谢！

Private Sub zl_SelChange()
    CommonDialog1.Flags = cdlCFEffects Or cdlCFBoth
    ' 显示“字体”对话框
    CommonDialog1.ShowFont
    zl.SelBullet = True
    zl.SelFontName = CommonDialog1.FontName
    zl.SelFontSize = CommonDialog1.FontSize
    zl.SelBold = CommonDialog1.FontBold
    zl.SelItalic = CommonDialog1.FontItalic
    zl.SelUnderline = CommonDialog1.FontUnderline
    zl.SelStrikeThru = CommonDialog1.FontStrikethru
    zl.SelColor = CommonDialog1.Color
End Sub
    这里zl是一个RichTextBox控件。这段代码运行时，只要我选中文字或者将光标移到RichTextBox控件中，就会弹出字体对话框。我不想这样，希望在点击“字体”按钮后才弹出字体对话框，该怎么做？

查看了一下RichTextBox相关的帖子，有几个跟我提出的是类似的问题，都没有得到理想的解决方案。

“我不想这样，希望在点击“字体”按钮后才弹出字体对话框，该怎么做？”

这个问题和RTF控件已经关系不大了。
问题出在将代码写在哪个事件里，你写在了SelChange事件，就是选区改变事件，你想想，应该写在哪里？

我觉得这个纯粹是VB第二节课要讲的内容，VB基础。跟RichTextBox一点关系都没有，能问出这种问题的，真的该好好学学了。

不是每个人都看书看得懂的，特别是不是学这个专业朋友。

我觉得还是找个实例来看看吧。