hey i want to beable to make a html editor. I want to make it so you can highlight something an click for eg bold. And then on either sde it will have the <B> blahblahgl <b/>
[CODE=vb]Private Sub Command1_Click( )
AddTag "<B>", "</B>"
End Sub
Sub AddTag(sStartTa g As String, sEndTag As String)
Dim lngNextSelStart As Long
With Text1
If Not .SelLength > 0 Then
lngNextSelStart = .SelStart + Len(sStartTag)
End If
.SelText = sStartTag & .SelText & sEndTag
If lngNextSelStart > 0 Then .SelStart = lngNextSelStart
.SetFocus
End With
End Sub[/CODE]
Comment