Con VB6 Replace (vedi help in linea).
Altrimenti te la devi fare...... sarebbe una cosuccia simpatica , basta usare un ciclo, la funzione instr e la funzione mid.