|
|
Postada em 20/06/2007 13:05 hs
Bom dia!!! Amigos, estou com um probleminha.. Tenho um text onde é armazenado várias palabras em sequencia como descrito abaixo: Ergonomia, Físico, Químico Preciso excluir uma delas, como faço para que exclua por exemplo a palavra "Físico" sem excluir as demais? Caso alguém possa me ajudar, desde já agradeço. Luciano. |
|
|
|
|
|
|
|
Postada em 20/06/2007 15:36 hs
If InStr(txtPalavras, strPalavra) > 1 Then
txtPalavras = Mid$(txtPalavras, 1, InStr(txtPalavras, strPalavra) - 3) & Mid$(txtPalavras, InStr(txtPalavras, strPalavra) + Len(strPalavra))
ElseIf InStr(txtPalavras, strPalavra) = 1 Then
txtPalavras = Mid$(txtPalavras, InStr(txtPalavras, strPalavra) + Len(strPalavra) + 2)
End If
________________________ Té + Que NIMB role bons Dados! 
|
|
TÓPICO EDITADO
|
|
|
|
JSFF
|
SÃO PAULO
SP - BRASIL
|
|
Postada em 20/06/2007 15:54 hs
Boa tarde. Acredito que seria melhor utilizar a função Replace(), com algumas adaptações, claro, algo mais ou menos assim: Text1.Text = Replace(<TEXTO>, <PALAVRA>, "") e fazer daqui para a frente mais alguma adaptação, até acertar o texto. JSFF |
|
|
|
|
|
Postada em 20/06/2007 20:21 hs
Ok pessoal, vou tentar fazer como vcs indicaram, obrigado pelo apoio.
|
|
|
|
|
