---
title: "Problem med att färga sträng i Richrextbox"
type: "forum-thread"
url: "https://www.webforum.nu/amne/dotnet/86646-problem-med-att-färga-sträng-i-richrextbox"
topic: ".NET"
topic_url: "https://www.webforum.nu/amne/dotnet"
author: "saw"
published: "2003-09-22T13:44:00.000Z"
updated: "2003-09-22T13:44:00.000Z"
replies: 0
views: 179
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/dotnet/86646-problem-med-att-färga-sträng-i-richrextbox"
---

# Problem med att färga sträng i Richrextbox

## #1 — saw, 2003-09-22T13:44Z

I en sträng så vill jag färga ett visst antal tecken till rött. Resterande vill jag ha till svart.
Jag försöker så här. 
Strängen:

```
   frMultiLanguage.txtSv = frMultiLanguage.txtSv.Text & RedText
("MultiLang_" & intMul & "=", frMultiLanguage.txtSv) & """" & 
Replace(tString, vbCrLf, " < BR > ") & """" & 
vbTab & vbCrLf
```

Min function ser ut så här:

```
Function RedText(sString As String, ByVal sText As RichTextBox) 
Dim langd As Long 
   sText.SelStart = 0 
   sText.SelLength = Len(sString) 
   sText.SelColor = vbRed 
   RedText = sString 
End Function
```

Resultatet, allting blir rött.
Förslag motages tacksamt.

Permalänk: https://www.webforum.nu/p/86646

---

Tråden på webben: https://www.webforum.nu/amne/dotnet/86646-problem-med-att-färga-sträng-i-richrextbox