Visual Basic.NET - ayuda con este error

   
Vista:

ayuda con este error

Publicado por LUIS quebuentema_r@hotmail.com (3 intervenciones) el 22/08/2014 21:05:54
Por favor necesito un poco de ayuda, estoy empezando con este curso y todavia no puedo entender muy bien cual es el error que me tira y como solucionarlo.
------------------------------------------------------------------------------------------------------------------------------------------------------
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
Public Class EscritorTexto
 
    Private Sub btnSalir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSalir.Click
        ' cerrar el formulario
        Me.Close()
    End Sub
 
    Private Sub btnGrabar_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnGrabar.Click
        ' declarar una variable para la escritura
        ' de texto en un fichero
        Dim oEscritor As StreamWriter
        ' crear un fichero de texto vacío
        ' y obtener un objeto StreamWriter
        ' para escribir en el fichero
oEscritor = E.CreateText(Environment.CurrentDirectory & "\" &
Me.txtNombreFichero.Text & ".TXT")
        ' escribir en el fichero el contenido del
        ' control TextBox
        oEscritor.Write(Me.txtTexto.Text)
        ' cerrar el objeto, lo que cierra también el
        ' fichero, y eliminar el objeto
        oEscritor.Close()
        oEscritor = Nothing
        ' objetos instanciados
        '---------------------
        oVar.Propiedad = valor ' asignar valor a propiedad
        variable = oVar.Propiedad ' recuperar valor de propiedad
        oVar.Metodo([ListaParametros]) ' llamar a método
        variable = oVar.Metodo([ListaParametros]) ' llamar a método y recuperar valor
        ' objetos compartidos
        '---------------------
        Objeto.Propiedad = valor ' asignar valor a propiedad
        variable = Objeto.Propiedad ' recuperar valor de propiedad
        Objeto.Metodo([ListaParametros]) ' llamar a método
        Variable = Objeto.Metodo([ListaParametros]) ' llamar a método y recuperar valor
    End Sub
End Class
--------------------------------------------------------------------------------------------------------------------------
desde ya muchas gracias a todos.
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
Imágen de perfil de xve

ayuda con este error

Publicado por xve (88 intervenciones) el 22/08/2014 21:50:55
Hola Luis, exactamente que error te da?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

ayuda con este error

Publicado por LUIS (3 intervenciones) el 23/08/2014 03:32:30
errores

aqui te envio una captura de pantalla de los errores y del programita que tengo que lograr que funcione
formulario
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

ayuda con este error

Publicado por Miguel (354 intervenciones) el 23/08/2014 20:04:50
Hola Luis, deseas que tu aplicación guarde el texto de un TexBox en un archivo (*.txt) ó ?
Saludos,
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

ayuda con este error

Publicado por LUIS (3 intervenciones) el 24/08/2014 07:54:45
si, asi es, eso es lo que tenia que lograr que hiciera pero como todavia no tengo muy claro todo esto que es nuevo para mi.
Esa programacion que pase es del boton guardar, pero me tira muchos errores
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

ayuda con este error

Publicado por Miguel (354 intervenciones) el 24/08/2014 18:03:23
Bueno, puedes hace esto de una manera más fácil; usando un control RichTextBox, mira:
-RichTextBoxTxt es tu control RichTextBox
-TextBoxNomreFichero es el textbox donde le asignas el nomre al fichero

Pon el siguiente código al boton guardar:

1
2
3
4
5
6
7
Try
            Dim Filename As String = My.Computer.FileSystem.CurrentDirectory.ToString & "\" & TextBoxNomreFichero.Text & ".txt"
            RichTextBoxTxt.SaveFile(Filename, RichTextBoxStreamType.PlainText)
            MsgBox("Archivo de texto '" & TextBoxNomreFichero.Text & "' generado exitosamente en '" & My.Computer.FileSystem.CurrentDirectory.ToString, MsgBoxStyle.Information, "Archivo Generado")
        Catch ex As Exception
            MsgBox(ex.Message.ToString, MsgBoxStyle.Critical, "Error")
        End Try


Saludos cordiales,
Miguel Huertas
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar