fatti una funzione che fa svariati replace sulla stringa passata.

text1.text = mia_funzione(text1.text)

e in mia_funzione fai:

public function mia_funzione(byval str as string) as string
str = replace(str, "-", "")

ecc...

return str
end function