String Handling - Easy One

Hi

I have a string which may be like this.

a1,a2,a4,a5,a6,a7.

I want to replace where the comma twice appear to one comma which is exactly like the one below.

a1,a2,a4,a5,a6,a7.

How to do it with Lotus Script…

please help.

Subject: String Handling - Easy One

Dim str1, str2, str3 As String

str1 = “a1,a2,a4,a5,a6,a7”

str2 = “,”

str3 = “,”

Msgbox Replace(str1, str2, str3)