Encontrar um paragrafo de texto em um arquivo txt em Visual Basic?

Eu quero que o programa encontrar um parágrafo especial de texto em um arquivo txt e, em seguida, editá-lo. Como posso fazer isso?

Resposta

Infelizmente, a resposta anterior realmente não lhe dizer como fazer isso, e o link é sobre outra coisa inteiramente. Mas ele estava no caminho certo: você deseja carregar o texto especificado como o texto de um Controlarar de TextBox.

Você não indica qual versão do Visual Basic que você está usando e a implantação que estiver utilizando Windows Forms, Windows Presentation Foundation, ASP.NET, etc. - então eu parto tem.NET e Windows Forms.

Vou também supor que os parágrafos são delimitados por quebras de linha, que é bastante normal.

Para carregar o texto especificado como o texto do Controlarar textbox:

' Abrir um StreamReader.

Dim sr como novo StreamReader("file.txt")

' Ler cada linha do arquivo e olhar para a bandeira... Obtenha o texto encontrado

Dim linha As String

Fazer

linha = sr.ReadLine()

Se linha.IndexOf ('encontrar estas palavras') <> -1, em seguida,

TextBox1. Text = linha

Sair

End If

Loop Until linha Is Nothing

' fechar streamreader

Sr.Close)

Em seguida, crie um botão que vai mudar o gráfico.

Em terceiro lugar, adicionar um manipulador de eventos para o evento de click do botão que abre o mesmo arquivo, encontra o mesmo texto, altera-lo, em seguida salva-lo.

' Abrir um StreamReader.

Dim sr como novo StreamReader("file.txt")

' Ler cada linha do arquivo e olhar para a bandeira.

Dim linha As String

Dim newfile como Cadeia de caracteres

Fazer

linha = sr.ReadLine()

Se linha.IndexOf ('encontrar estas palavras') = -1, em seguida,

NewFile + = linha & vbCrLf

Outra pessoa

NewFile + = textBox1. Text & vbCrLf

End If

Loop Until linha Is Nothing

' fechar streamreader

Sr.Close)

' abrir o streamwriter

Dim sw como nova StreamWriter("file.txt")

«novo conteúdo do arquivo para o arquivo de despejo

SW.Write(NewFile)

' escritor estreita

SW.Close)