Suplir el texto del command 1:
Public Class Form
Dim ruta = My.Computer.FileSystem.SpecialDirectories.Desktop & "\agenda.txt"
Private Sub Button….
My.Computer.FileSystem.WriteAllText(ruta, vbCrlf & "Nombre: " & TextBox1.Text & "Telefono" & TextBox2.Text & vbCrlf, True)
Message.Show("Agenda")
End Sub
Suplir el código del command2:
Dim fileReader As String fileReader = My.Computer.FileSystem.ReadAllText("C:\Agenda.txt") MsgBox(fileReader)
Comentarios
Publicar un comentario