Hur gör jag så att jag byter ut a mot 1, b mot 2 och så vidare i en textbox när användaren trycker på en commandbutton...

/Hjorten

strText= replace(strText,"a","1")

Tack, ska testa det när min skärm kommer tillbaka från lagning.

Det funkar inte för jag har inte VB6 utan VB5, har du eller nån annan nån kod som kan funka för VB5?

/Hjorten

Hmm, vet inte vad som finns och inte finns i vb5 men så här kan du åsså göra...

Dim strText
Dim strNyText
Dim i As Integer

strText = Text1
strNyText = ""

For i = 1 To Len(strText)
Select Case Mid(strText, i, 1)
Case "a", "A"
strNyText = strNyText & "1"
Case "b", "B"
strNyText = strNyText & "2"
Case Else
strNyText = strNyText & Mid(strText, i, 1)
End Select
Next i

Text2 = strNyText

Det funkar perfekt, tackar!
Programmet kommer förmodligen upp imorgon på www.smda1c.com

/Hjorten