Writing a macro... replace function?

Hi,

You're going to have to write your own function. Loop thru the characters in the string, looking to the replace value.

Skip,
^{Don't let the Diatribe...
talk you to death!}
_{Just traded in my old subtlety...
for a NUANCE!}

Does Extra! Basic have a Replace function similar to MS VB?

myStr = Replace(MyStr, """", "")

Have you checked in Extra Basic HELP?

Skip,
^{Don't let the Diatribe...
talk you to death!}
_{Just traded in my old subtlety...
for a NUANCE!}

I checked and saw nothing in there.

I doctored up two solutions... one replaces a string with nothing, and one replaces a string with something:

Function RemoveChars(strText As String, strUnwanted As String) As String

Dim TempStr, CurChar As String
Dim x As Integer

For x = 1 To Len(strText)
CurChar = Mid(strText, x, 1)
If InStr(strUnwanted, CurChar) = 0 Then TempStr = TempStr & CurChar
Next x
RemoveChars = TempStr

End Function

Function ReplaceChars(strText As String, strUnwanted As String, strWanted as String) As String

Dim currLoc As Integer
Dim StringLength As Integer
Dim tmpChar As String

StringLength = Len(strText)
For currLoc = 1 To StringLength
tmpChar = Mid(strText, currLoc, 1)
If InStr(strUnwanted, tmpChar) Then
' Replace with the new character
Mid(strText, currLoc, 1) = strWanted
End If
Next

RemoveCharacters = strText

End Function