Menu & Text question [RESOLVED!]

[Madboy]

Ok, like in a text editor you can select bold etc from the menu. Thats ok, i can do that - im using RTF here is my code:

Private Sub mnuFormatBold_Click()
On Error Resume Next
'Bolden text
mnuFormatBold.Checked = Not mnuFormatBold.Checked
txtMain.SelBold = mnuFormatBold.Checked
txtMain.SelStart = Len(txtMain.Text)
End Sub

Anyway i want to be able to click on a piece of text and determine if the selected text is say bold or not. So if the highlighted text is bold, the menu is checked, otherwise it isnt. This is so the user can view the selected text and see what has been formatted from the menu. If you know what i mean. I tried something like;

If txtMain.Sel = (i tried adding true, but obviously it needs text).

So any ideas are highly appreciated.

THANKS!