indsæt tekst

hej jeg er ved at lave et lille program.

og jeg vil høre hvordan kan jeg gøre sådan at hvisman har market lidt tekst også trykker på en lille knap at så indsætter man tekst på begge sider lidt lide som i en html editer. jeg har prøvet at lege lidt med det men jeg får en fejl jeg ikke lide kan løs.

min kode

Private Sub cmdFed_Click()
    txt = "<strong>" & txt & "<strong />"
End Sub

Min fejl som kommer når jeg høre programmet også tester knappen.

<strong>{\\rtf1\\ansi\\ansicpg1252\\deff0\\deflang1030{\\fonttbl{\\f0\\fnil\\fcharset0 Verdana;}}
\\viewkind4\\uc1\\pard\\f0\\fs17 xx
\\par }
<strong />

De to xx der er den tekst der skulle have en strong kode omkring.

Med venlig hilsen Rene