CODIGO QUE ABRE UM ARQUIVO.

USUARIO.EXCLUIDOS 20/12/2006 21:46:30
#191315
Eu estou com um projeto de um bloco de notas. Ele salva, edita, cola, recorta, copia, limpa porém... na hora de Abrir um outro arquivo Txt eu me perdi nos códigos.

Aqui está o código fonte do botão OK, na form de abrir um arquivo.

    Private Sub cmdOk_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdOk.Click
        Dim Arquivo As String
        Arquivo$ = (dirDiretorio.Path + "\" + filArquivos.FileName)
        FileOpen(1, Arquivo, OpenMode.Input)
        frmBloco.txtTexto.Text =  (falta a variavel que contém a captura do arquivo .txt)
        FileClose(1)
        Me.Hide()
    End Sub



é simples , eu só quero abrir um arquivo Txt e exibir o conteudo dele na form principal do programa.

Aguardo respostas. Obrigado.
RAMSES 20/12/2006 22:44:38
#191319
que versao do vb .net vc esta usando ?
MORDOR 20/12/2006 22:46:02
#191320 Resposta escolhida 
Imports System.IO

Dim stream As StreamReader = File.OpenText("c:\arquivo.txt")
TextBox1.Text = stream.ReadToEnd()
stream.Close()
USUARIO.EXCLUIDOS 20/12/2006 22:47:18
#191321
Uso Visual Basic 2005 Express Edition
RAMSES 20/12/2006 22:50:19
#191322 
frmBloco.txtTexto.Text = my.Computer.FileSystem.ReadAllText(Caminho)

USUARIO.EXCLUIDOS 20/12/2006 22:51:06
#191323
Consegui com o Código do Mordor. Muito Obrigado.
Tópico encerrado , respostas não são mais permitidas
Voltar