do
                pzCheck = strchr(pzCheck,asc(","))
                if pzCheck=0 then exit do
                *pzCheck = asc(!"\n")
              loop