Ler palavra arquivo atraves RichTextBox LoadFile

[kassilnamen 0]

Ola gostaria de saber como faco para colocar uma acao IF em uma linha especifica de um arquivo de texto que corre atraves do RichTextBox.LoadFile

Eu ja estou conseguindo abrir o arquivo normalmente e colocalo na RichTextBox.

Quero fazer algo como

 

Dim Message as String

IF TaL_PalaVraExiStEnoArquiVO then

 

Message = "Parabens esta palavra existe no arquivo"

MsgBox(Message)

 

end IF

 

 

 

 

Grato

[MartinsV 0]

Cara, você pode usar a função Find do RTB.

 

Por exemplo:

 

Dim palavra As Integer = RTB.Find("palavra que você quer") 'Procura a tal palavra

'Como (se não me engano) o RTB retorna -1 se não achar o termo, eu faço a seguinte instrução If:
If palavra <> -1 Then
   MsgBox("Parabens esta palavra existe no arquivo")
Else
   MsgBox("Desculpe, a palavra não foi encontrada")
End If