关于richtextbox的一点小问题

[tongnaifu]

richtextbox中，如果先用selcolor改变了字体的颜色，然后再改变字体的大小等就会出现字体颜色还原成默认颜色的情况，请问怎样才能不还原字体的颜色？

[tongnaifu]

顶一个，没人帮忙解决？

[xiaoyaolz]

那就在改动时重新高定一下或者何存一个数组进行属性设定，相关的属性都重设

[tongnaifu]

还没人帮忙解决吗？如果分少，可以再开贴送分

[wenhongL]

没有问题阿！
Private Sub Command1_Click()
Me.CommonDialog1.ShowColor
Me.RichTextBox1.SelColor = Me.CommonDialog1.Color
End Sub

Private Sub Command2_Click()
Me.RichTextBox1.SelFontSize = 12
End Sub