Visual Basic - Agenda

Life is soft - evento anual de software empresarial
 
Vista:

Agenda

Publicado por Alberto (1 intervención) el 27/02/2010 00:18:41
Hola, estoy programando una agenda en visual basic 2008, y lo que hace esta agenda es pasar el contenido de un textbox a un CHECKEDLISTbox. Hasta ahí todo bien, ahora, el problema es que lo que anotas luego se borra en cuanto cierras el programa.

Lo que me gustaría saber, es cómo guardarlo. He probado a guardarlo con un botón, y se guarda pero no se abre. Lo abro con el bloc de notas y sale esto:

System.Windows.Forms.CheckedListBox+ObjectCollectionjueves, 25 de febrero de 2010
7:00
Dentistamiércoles, 03 de febrero de 2010

%:00
Dentista

Evidentemente, es un ejemplo.

Entonces, se podría conseguir que al abrir este archivo (con la extensión .eg), la lista de las tareas a realizar se llenara otra vez con lo anterior establecido? O también serviría que simplemente la lista no se borrara... Aunque prefiero lo primero.

El código del botón de abrir:

Dim Open As New OpenFileDialog()
Dim myStreamReader As System.IO.StreamReader
Open.Filter = "Documento de E-Agenda [*.eg]|*.eg"
Open.CheckFileExists = True
Open.Title = "Abrir Archivo..."
Open.ShowDialog(Me)
Try
Open.OpenFile()
myStreamReader = System.IO.File.OpenText(Open.FileName)
CheckedListBox1.Text = myStreamReader.ReadToEnd()
Catch ex As Exception

El código del botón de guardar:

Dim Save As New SaveFileDialog()
Dim myStreamWriter As System.IO.StreamWriter
Save.Filter = "Documento de E-Agenda (*.eg)|*.eg"
Save.CheckPathExists = True
Save.Title = "Guardar como..."
Save.ShowDialog(Me)
Try
myStreamWriter = System.IO.File.AppendText(Save.FileName)
myStreamWriter.Write(CheckedListBox1.Text)
myStreamWriter.Flush()
Catch ex As Exception

End Try

Gracias de antemano.

PD. Está adaptado de un código para guardar un textbox, así que no se si está bien del todo...
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