Visual Basic.NET - relizando un programa que guarde y abra ficheros y no encuentro el error

 
Vista:
Imágen de perfil de Misael
Val: 38
Ha disminuido su posición en 6 puestos en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

relizando un programa que guarde y abra ficheros y no encuentro el error

Publicado por Misael (35 intervenciones) el 06/09/2016 19:42:19
NO ENCUENTRO CUAL ES EL ERROR EN MI CÓDIGO relizando un programa que guarde y abra ficheros
solo tengo un textbox.

Este es el código

1
2
3
4
5
6
7
8
9
10
'boton guardar 
 
  Dim SFD As SaveFileDialog
        SFD.Filter = "txt|*.txt"                                       ' esta line me tira un error 
        Dim ResultadoSFD As String
        ResultadoSFD = SFD.ShowDialog ' ruta y nombre del archivo 
        Dim sw As New IO.StreamWriter(ResultadoSFD)
        sw.Write(Me.TextBox1.Text)
        sw.Flush()
        sw.Close()

1
2
3
4
5
6
7
8
 'Botón Abrir 
        Dim ofd As New OpenFileDialog
        ofd.Filter = "txt|*.txt"
        Dim resultadofd As String
        resultadofd = ofd.ShowDialog()
        Dim sr As New IO.StreamReader(resultadofd)  ' esta line me tira error 
        Me.TextBox1.Text = sr.ReadLine
        sr.Close() 'cierra el fichero 

errores botón guardar

1

error botón abrir



2


espero me puedan ayudar
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil
Val: 481
Bronce
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

relizando un programa que guarde y abra ficheros y no encuentro el error

Publicado por Miguel (476 intervenciones) el 07/09/2016 00:18:22
Hola,

Para ambos casos (abrir y guardar) estás usando mal el diálogo; la función 'ShowDialog()' retorna un valor tipo 'DialogResult' que indica la acción realizada (OK, Cancel, etc). En tu caso tienes que consultar si el resultado es 'DialogResult.OK', y utilizar la propiedad 'Filename' (que es la ruta seleccionada) para abrir o guardar tus datos respectivamente.

Por último, te falta el 'New' cuando declaras tu dialogo de guardar, ya que como está ahora queda con valor 'Nothing' y al tratar de utilizarlo te lanza excepciones.


Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar