none
Como carregar um arquivo? RRS feed

  • Pergunta

  • Olá amigos do MSDN, a rotina abaixo cria e grava um arquivo texto, alguém pode me dar uma força como seria uma rotina para carregar o arquivo?

    Imports System.IO
    Imports System.IO.File

    Public Class Form1

        Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click

            Dim W As IO.StreamWriter

            My.Computer.FileSystem.CreateDirectory("C:\Usuario\Home10")

            W = New IO.StreamWriter("C:\Usuario\Home10\arquivoAprendendo.txt")

            W.WriteLine(TextBox1.Text)

            W.WriteLine(TextBox2.Text)

            W.Close()

        End Sub

    End Class

    domingo, 24 de junho de 2018 02:30

Respostas

  • Tente assim:

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
            TextBox1.Text = "Isto é "
            TextBox2.Text = "um teste!"
    
            Dim W As IO.StreamWriter
    
            My.Computer.FileSystem.CreateDirectory("C:\Users\Mariano\Desktop\teste")
    
            W = New IO.StreamWriter("C:\Users\Mariano\Desktop\teste\Novo Documento de Texto.txt")
    
            W.WriteLine(TextBox1.Text)
    
            W.WriteLine(TextBox2.Text)
    
            W.Close()
    
            Dim R As IO.StreamReader
            R = New IO.StreamReader("C:\Users\Mariano\Desktop\teste\Novo Documento de Texto.txt")
    
            TextBox3.Text = R.ReadLine
            TextBox4.Text = R.ReadLine
    
            'ou assim
    
            TextBox3.Text = R.ReadToEnd()
    
            R.Close()
    
           
        End Sub


    MARIANO1776

    domingo, 24 de junho de 2018 16:51