VBA.replace替换单引号或双引号

mystring=replace(mystring,chr(39),"") '替换单引号

mystring=replace(mystring,chr(34),"")    '替换双引号

mystring=replace(mystring,"<","")    '替换<

mystring=replace(mystring,">","")    '替换>

mystring=replace(mystring,chr(13),"") '替换回车符

mystring=replace(mystring,chr(32),"") '替换空格符

mystring=replace(mystring,chr(9),"") '替换tab符