PESQUISAR POR PALAVRA CHAVE NO ARQUIVO TXT

 Tópico anterior Próximo tópico Novo tópico

PESQUISAR POR PALAVRA CHAVE NO ARQUIVO TXT

VB.NET

 Compartilhe  Compartilhe  Compartilhe
#491675 - 04/12/2019 10:18:47

ELMO01
BELO HORIZONTE
Cadast. em:Agosto/2004


Última edição em 04/12/2019 10:21:57 por ELMO01

Ola pessoal

Tenho um arquivo TXT e quero procurar uma palavra chave neste arquivo e colocar toda a linha onde está esta palavra dentro de um vetor. Como faço para procurar esta palavra chave dentro do arquivo?

Arquivo TXT:
MARIA;389621:04/12/2019
FLAVIA:457231:08/04/2019


No caso tenho um TextBox que escrevo a palavra chave ao qual será pesquisada no arquivo TXT, exemplo

TextBox -> FLAVIA

depois que pressionar o enter neste textbox o programa vai abrir o arquivo txt e procurar pela palavra chave e colocar toda a linha em um vetor.

Como faço isso??

Obrigado  


elmo

#491679 - 04/12/2019 10:42:02

KERPLUNK
RIO GRANDE DO SUL
Cadast. em:Junho/2009


Membro da equipe
Abra o arquivo, leia o texto, faça um for...next para cada linha, em cada linha pesquise pela palavra chave usando funções de texto, quando a linha encontrada contiver o valor pesquisado, use o método split e terá a linha em array(o que suponho você chama de vetor).

_______________________________________________________________________
Virei Oráculo!
The end is nigh, be ready for the nukes!


#491688 - 04/12/2019 13:31:16

PROGRAMADORVB6
LISBOA
Cadast. em:Janeiro/2004


Vou liberar um exemplo para você.

______________________________________________________________________________

Que minha coragem seja maior que meu medo e que minha força seja tão grande quanto minha fé.


Resposta escolhida #491700 - 05/12/2019 02:17:10

JABA
CABO FRIO
Cadast. em:Agosto/2005


Só Adaptar ao teu gosto.

        Dim oTxtIn As New IO.StreamReader("C:\SEUTEXTO.TXT") ' Carrega o arquivo na memória.
        Dim oTxtContent As String = oTxtIn.ReadToEnd() ' Lê os dados e insere na String.
        Dim vetor() As String = oTxtContent.Split(Environment.NewLine) ' Quebra por linha o conteúdo.


        Dim  texto_pesquisa as string = "MARIA"
        Dim  vetor_desejado() as string
        
        For x as integer = 0 to vetor.Length-1
            Dim  s() as string = vetor(x).Split(new char(){":"})
            for y as integer = 0 to s.Length-1
                if s(y) = texto_pesquisa then
                    vetor_desejado = s
                    exit for
                end if
            Next
        Next

        if vetor_desejado isnot nothing then
            For x as integer = 0 to vetor_desejado.Length-1
                Console.WriteLine(vetor_desejado(x))
            Next
        end if


_______________________________________________________________________________________________

Se a alma ou espírito são imateriais, como eles fazem para se localizarem quando o corpo está em movimento?



#491782 - 10/12/2019 21:47:20

ELMO01
BELO HORIZONTE
Cadast. em:Agosto/2004


Última edição em 10/12/2019 21:47:56 por ELMO01

JABA e a todo que responderam, gostaria de agradecer.

JABA seu exemplo deu certo mais o sistema está colocando esta instrução para quebra de linha "vbLf & "  , como faço para que esta instrução não apareça na segunda linha sem retirar a quebra de linha.

vbLf & "ADMIN;ADMIN;02/12/2019;19:25

Obrigado


elmo

#491813 - 11/12/2019 23:04:06

JABA
CABO FRIO
Cadast. em:Agosto/2005


Citação:
:
JABA e a todo que responderam, gostaria de agradecer.

JABA seu exemplo deu certo mais o sistema está colocando esta instrução para quebra de linha "vbLf & "  , como faço para que esta instrução não apareça na segunda linha sem retirar a quebra de linha.

vbLf & "ADMIN;ADMIN;02/12/2019;19:25

Obrigado


Não sei se entendi sua dúvida. Para usar um separador, você pode fazer assim:

        Dim separador() As String = {"vbLf &"}
        
        dim texto as string = "A vbLf & B vbLf & C"
        
        Dim vetor() As String = texto.Split(separador, StringSplitOptions.RemoveEmptyEntries)
        
        Console.WriteLine(vetor(1))


_______________________________________________________________________________________________

Se a alma ou espírito são imateriais, como eles fazem para se localizarem quando o corpo está em movimento?



 Tópico anterior Próximo tópico Novo tópico


Tópico encerrado, respostas não sao permitidas
Encerrado por ELMO01 em 10/01/2020 14:41:39