CONTEUDO DE TEXTO NAO APARECE.

MRVZ 02/05/2010 11:24:58
#340742
Bom dia a Todos!!!

é a primeira vez que estou usando aqui e gostaria da ajuda de vocês.
Estou criando um programa que grava arquivos de texto usando o StreamWriter , só que o conteúdo digitado na TextBox não aparece, ele só cria o arquivo.

Esse é o código que estou usando:

Try

Arquivo = File.CreateText(Me.txtNomeArquivo.Text)
Arquivo.Write(Me.txtTexto.Text)
MessageBox.Show([Ô]Arquivo Gravado com sucesso![Ô], [Ô]Parabéns!!![Ô], MessageBoxButtons.OK, MessageBoxIcon.Information)

Catch ex As Exception

Mensagem = [Ô]Aconteceu um Erro Inesperado!!![Ô] & vbCrLf
Mensagem += ex.Message & vbCrLf
MessageBox.Show(Mensagem, [Ô]Erro!!![Ô], MessageBoxButtons.OK, MessageBoxIcon.Hand)

End Try

Desde já agradeço a ajuda!

Paz e Bem!!!
TECLA 02/05/2010 11:46:08
#340746 Resposta escolhida
Já experimentou fazer o CLOSE antes do MESSAGEBOX?

Exemplo:
Imports System.IO

Dim arq As New StreamWriter([Ô]C:\Tecla.txt[Ô])
arq.WriteLine([Ô]Seja bem-vindo ao VBMania.[Ô])
arq.Close()
MessageBox.Show([Ô]Arquivo criado com sucesso![Ô])
MRVZ 02/05/2010 12:17:09
#340755
Valeu Tecla!!! Deu certo!!!

Como sou novo nesse lance de programação ainda não sei muita coisa!!!

Muito Obrigado mesmo!!!

Paz E Bem!!!
TECLA 02/05/2010 12:18:10
#340756
Citação:

:
Valeu Tecla!!! Deu certo!!!

Como sou novo nesse lance de programação ainda não sei muita coisa!!!

Muito Obrigado mesmo!!!

Paz E Bem!!!



Que isso, todos nós somos (ou fomos) iniciantes...
Só não esqueça de ENCERRAR o tópico.

Até a próxima!
Tópico encerrado , respostas não são mais permitidas
Voltar