Busca numa string

[allext 0]

Aeh gente ! toh cuma duvida cruel... jah olhei no forum pra ver se achava algo parecido, mas naum encontrei nada por isso pesso ajuda a vcs. tem alguma funcaum que encontre uma determinada palavra dentro de uma string, tipo string='agua pedra fogo terra' e quero saber se ela conteim 'pedra' .... gradesso desde jah... :noel:

[eriva_br 7]

você pode usar a função InStr, veja:

 

Dim str1 As Stringstr1 = "tricolor tricampeão mundial"Dim str2 As Stringstr2 = "tricolor campeão mundial 2005"If InStr(1, str1, "tricampeão", vbTextCompare) > 0 Then	MsgBox "str1 encontrou tricampeão"Else	MsgBox "str1 NÃO encontrou tricampeão"End IfIf InStr(1, str2, "tricampeão", vbTextCompare) > 0 Then	MsgBox "str2 encontrou tricampeão"Else	MsgBox "str2 NÃO encontrou tricampeão"End If

 

:noel:

[allext 0]

:natalw00t: BBBBrigadaum Eriva_br ! valeu mermo.