В простейшем случае это выглядело бы так:
- Код: Выделить всё
mto.sHTML = "<html><body><p><font face=""Courier New""><font size=2>" _
& Replace(ss, s, "<font color=""#FF0000"">" & s & "</font>", , , CompareMethod.Text) _
& "</p></body></html>"
Но ведь символы в строке могут быть разные, какие-то надо отквотить...
Как это покрасивше можно сделать, чтобы ерунды не накрутить???
