TEXTBOX
Amigo, testei e esta salvando um em cada linha.
PORQUE O MEU ESTà DANDO ERRADO VOCÊ PODE POSTAR A SUA SUB PARA MIM ?
eu apenas copiei e colei essa ultima que me mandou.
e o que fiz antes você não publicou para ele aceitar salvar
Simplesmente copie isso:
Dim salvarComo As SaveFileDialog = New SaveFileDialog()
Dim caminho As DialogResult
Dim fluxoTexto As IO.StreamWriter
Dim Arquivo As String
salvarComo.CheckFileExists = False
salvarComo.Title = [Ô]Arquivos Textos [Ô]
salvarComo.Filter = [Ô]Text files (*.txt)|*.txt|All files (*.*)|*.*[Ô]
caminho = salvarComo.ShowDialog
Arquivo = salvarComo.FileName
If Arquivo = Nothing Then
MessageBox.Show([Ô]Arquivo Invalido[Ô], [Ô]Salvar Como[Ô], MessageBoxButtons.OK)
Else
fluxoTexto = New IO.StreamWriter(Arquivo)
fluxoTexto.WriteLine(TextBox1.Text)
fluxoTexto.WriteLine(TextBox2.Text)
fluxoTexto.WriteLine(TextBox3.Text)
fluxoTexto.WriteLine(DateTimePicker1.Text)
fluxoTexto.Close()
End If
ALTAIR148
bRoder mil desculpas eu tinha escrito uma palavra errada da sub por isso estava DANDO ERRADO
bRoder mil desculpas eu tinha escrito uma palavra errada da sub por isso estava DANDO ERRADO
AGORA EU CONSIGO SALVAR DIREITO OBRIGADO SE EU QUISER INCLUIR APESSOAS ABAIXO UMA DA OUTRA TENHO QUE ACRESCENTAR MAIS COISAS NA MESMO FOLHA UMA PAGINA E FACÃL E OUTRA VOU LHE FAZER OUTRO PEDIDO COMO MONTO A SUB PARA IMPRIMIR
Você quer imprimir o que está nos textbox ou no txt?
SIM COMO FAÇO ESSA SUB
Tópico encerrado , respostas não são mais permitidas