Update CleanString.bas