Highlights
All Snippets
Top 100 Snippets
Librarians
gbCodeLib

By Language
VB6
JavaScript
Perl
HTML
SQL
Java
DOS

GBIC >> Source Code >> Visual Basic >> Snippet

Eliminate duplicate character pairs in a string


'before using Split, eliminate instances of duplicate delimiters
D2 = "\\"
D = "\"
Do Until InStr(MyString, D2) = 0
   MyString = Replace(MyString, D2, D)
Loop