Simplificar Função

[Teacher Nick 0]

Tenho uma função que trata uma string

 

dim textos as string
sub tratar()
texto = replace("texto", "0", "")
texto = replace("texto", "1", "")
texto = replace("texto", "8", "")
texto = replace("texto", "p", "")
texto = replace("texto", "<>", "")
texto = replace("texto", "4", "")
texto = replace("texto", "11", "")
texto = replace("texto", "33", "")
end sub

Teria como eucriar uma função para simplificar isso ?

 

Obrigado

[Oenning 0]

Só consigo pensar em criar um array e varrer ele, algo assim:

 

string[] oldChar = {"0","1","8","p"};
foreach(string s in oldChar)
texto = texto.Replace(s, "")

Talvez consiga algo com expressões regulares, não manjo muito.

 

Att,

Guilherme Oenning.

[Teacher Nick 0]

Só consigo pensar em criar um array e varrer ele, algo assim:

 

string[] oldChar = {"0","1","8","p"};
foreach(string s in oldChar)
texto = texto.Replace(s, "")

Talvez consiga algo com expressões regulares, não manjo muito.

 

Att,

Guilherme Oenning.

 

Humm legal... mas será que ganhamos desempenho desse modo ?

 

O que ta acontecendo é que minha aplicação para de responder .... depois volta....

 

gostaria de resolver esse problema.... obrigado

[Oenning 0]

A não ser que você tenha um computador MUITO MUITO ruim, o trecho acima deve executar em questão de milésimos de segundos.

Você tem certeza que é isso que está deixando lento?

 

Att,

Guilherme Oenning.