Hej!
Vet någon om det går att använda nån funktion (i VB5) som byter ut ett tecken i en sträng mot ett annat?

Tack!
/RiPPeR

Sök efter replace i tips & tricks, tror det finns en sådan rutin där. Gör det inte det, så kolla www.vbcode.com för där lär det finnas. - Lägg i så fall in den i tips & tricks så nästa slipper fråga ;-)

Hälsningar
/Pelle

Hej
Ett exempel som jag användt för att känna av om
det finns en . (punkt) i txtValue (TextBox) i så fall
ändra till , (komma)

Dim pos as Long
Dim tmpStr As String
If InStr(txtValue, ".") Then
tmpStr = txtValue
pos = InStr(tmpStr, ".")
Mid$(tmpStr, pos) = ","
txtValue = tmpStr
End If

mvh
Sven

När diskussionen ändå är igång, kan jag passa på att fråga om en bra kod för en "Sök"-funktion (i ett textdokument) och en "Sök och ersätt"-funktion.

Är det samma princip som ovan?

Tacksam för svar!

MvH Dan "DaPe" Persson

Hej och tack!
Nu har jag lagt upp två tips från vbcode.com. Ett som ersätter tecken och det andra söker och ersätter strängar i en sträng.

Jag tror att jag använder Svens exempel eftersom det är precis det jag vill göra.

/RiPPeR

Hej
Det värmer .
Ds

Har testat denna kod, men det funkar inte så bra om det ord man ska byta bort är längre än det som man byter med det byts nämligen bara lika många bokstäver som det nya ordet är långt..

ex:
Om jag ska byta:

Visual Basic

till bara VB blir resultatet:

VBsual Basic

det andra försvinner alltså inte =( nån som har en kod är allt byts?

Används replace som någon nämde tidigare.

<code>
strText = "Jag tycker Visual Basic är roligt"
strSeek = "Visual Basic"
strNewWord = "VB"

strResultat = Replace(strText, strSeek, strNewWord)

MsgBox strResultat
</code>

/Janne

tack! nu funkar det perfekt!