>I have a combo box with the names of font loaded into it. When the
>user selects a font, I want to change the font of the selected text
>in a RichTextControl:
>
>
>Private Sub cboFontNames_Change()
>
> RichTextBox.SelFontName = cboFontNames.Text
>
>End Sub
>
>
>Why doesnt this work?

Is it because you need to write RichTextBox1 ?

I made this small test and it is working:

Private Sub Command1_Click()
RichTextBox1.SelFontName = "arial"
End Sub