rich text format

[brew2]

this works in vb6 but as a newbie to vb2005 I am at loss to convert

If rtfText.SelBold = True Then
     rtfText.SelBold = False
     Call BoldStatus(False)
Else
     rtfText.SelBold = True
     Call BoldStatus(True)
End If

Also, after the font dialog box is opened (.showdialog)

fdgLetters.ShowDialog()
rtfText.SelFontName = cdlText.FontName  'how to set font?
rtfText.SelFontSize = cdlText.FontSize  'How to set font size?

Thanks for the help.

 

[brew2]

Found some examples which should work. thanks