Teplace i Richtextboxar.

2 svar · 140 visningar · startad av saw 21 sep. 2003

sawMedlem sedan mars 20011 880 inlägg

Trådstart21 sep. 2003 09:43#1

Jag körde tidigare två textboxar med replace imellan:

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

frMultiLanguage.txtHtml = Replace(frMultiLanguage.txtHtml, 
tString, "<%= MultiLang_" 
& intMul & " %>")

tString innehåller den markerade texten. Nu har jag bytt ut de ordenarie textboxarna
mot richtextboxar (kan färglägga taggarna) men då fungerar helt plötsligt inte replacen längre. Hur kan jag ordna det?

Nexus86Medlem sedan okt. 20023 030 inlägg

21 sep. 2003 12:16#2

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

frMultiLanguage.txtHtml.Text = Replace(frMultiLanguage.txtHtml.Text, tString, "<%= MultiLang_" & intMul & " %>")

Bör fungera. Tror rtfText är standard på RichTextBoxar och det kan förklara en del om varför det inte fungerar om man inte skriver .Text efter.

R// Bara av ren nyfikenhet, varför bytte du till RichTextBoxar?

R2// Hittade visst svaret i ditt inlägg..

sawMedlem sedan mars 20011 880 inlägg

21 sep. 2003 19:03#3

Det fungerar perfekt, men om jag nu enbart i den taggen som jag replacar, vill ha med en fontfärg, hur bör det då bli?