Indsæt ting

Hvis rtbHTML er din rich textbox, kan du formatere den markerede tekst, med alle de kommandoer:

rtbHTML.Sel* 'Sel betyder selected

Når intet er markeret vil SelText være lig med "", og så kan du sætte værdi af den, til den kode du vil indsætte.

Eksempel:

If rtbHTML.SelText <> "" Then
    If MsgBox("Vil du overskrive det markerede?", vbYesNo) = vbNo Then
        Exit Sub
    End If
End If

rtbHTML.SelText = "Kode"

Tekst = Tekst + DenNyeTekst

... Hvis det var det du mente

ikke helt jeg er ved at lave en html editer og hvis man trykker på en code kanp så skal den indsæt den der hvor man er ved at skrive.