si, le erre al quoteo

hay varias cosas para corregir, parece que estas programando a la visual basic 6.

1 - no se porque usas para controlar los errores el On Error GoTo, en .NET se usa Try Catch.

2 - para abrir y guardar los archivos te recomiendo usar StreamReader y StreamWriter, que son unicos de .NET y son los que se usan.

para cargar al listbox hay varios metodos, algunos te dejan hacerlo sin estar recorriendo linea por linea el archivo.

aca te paso 2 metodos de carga, bien de .NET, y un metodo de guardado:

Imports System.IO
 
Public Class Form1
    ' Carga todo en una sola linea
    Private Sub MetodoCarga1()
        ListBox1.Items.AddRange(File.ReadAllLines("C:\prueba.txt"))
    End Sub
 
    ' Carga usando StreamReader, linea por linea hasta el final del archivo
    Private Sub MetodoCarga2()
        Dim vArchivo As New StreamReader("C:\prueba.txt")
 
        While Not vArchivo.EndOfStream
            ListBox1.Items.Add(vArchivo.ReadLine())
        End While
 
        vArchivo.Close()
    End Sub
 
    ' Guarda usando StreamWriter
    Private Sub MetodoGuardado()
        Dim vArchivo As New StreamWriter("C:\prueba.txt")
 
        For Each vLinea As String In ListBox1.Items
            vArchivo.WriteLine(vLinea)
        Next
 
        vArchivo.Flush()
        vArchivo.Close()
    End Sub
End Class

Bueno seba123neo  y spiritdead estos son los codes que tengo


Para agregar y guardar en un archivo txt los items de un list box es este :


Y estos para cargar los datos otra vez al list box :

dim textoSineditar as string =""
dim textoeditado as string=""
 
if textoSineditar.contains("") then
textoeditado = textoSineditar.replace("","")
end if 
 

dim textoSineditar as string =""
dim textoeditado as string=""
 
if textoSineditar.contains("") then
textoeditado = textoSineditar.remove(textosineditar.startwith(""),3)
end if 
 

la solucion no es reemplazar los caracteres, la solucion debe ser ver porque te esta grabando esos caracteres, hace estas 2 simples cosas.

1 - fijate si el archvio de texto creado tiene realmente esos caracteres grabados, abrilo con el bloc de notas y fijate.

2 - pone el codigo fuente que usas para grabar y cargar el archivo, me juego que ahi esta el problema.

sin codigo no podemos ver que estas haciendo.

Bueno hola a todos como ya saben soy nuevo en esto de vn anteriormente utilisaba el 6.0 pero ahora utiliso el vb 2008

bueno mi duda es que cree un programa en la cual podias agragar cosas a un list box y en el puedes guardarlo en un archivo .txt la cual se guardan y automaticamente cuando inicias la aplicacion ontra ves esten hay pero el unico problema es que cuando lo abro me aparece lo siguiente:

un ejemplo

Introduci

http://google.com

al textbox y le di al boton aceptar se me agrega al listbox y automaticamente se gurda en el archivo txt

Cuando lo Abro nuevamente se me agrega algo al listbox junto al texto que introduje

http://google.com

Entonce quiero hacer de manera que no me aparezca el 

El code que tengo es mas o menos haci

Bueno por hay me quede no se hacer decir que se borre un texto seleccionado porfavor ayuda!!

listbox1.text.replace("","")

bueno crear el TabPage es facil y meterle controles adentro tambien, aca un ejemplo simple que tambein maneja los eventos de cada control en cada tab.

Public Class Form1
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Call CrearTab()
    End Sub
 
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        TabControl1.TabPages.Remove(TabControl1.SelectedTab)
    End Sub
 
    Private Sub CrearTab()
        Dim NewTab As New TabPage
        NewTab.Name = "Tab" & TabControl1.TabCount
        NewTab.Text = "Tab " & TabControl1.TabCount
 
        Me.TabControl1.Controls.Add(NewTab)
 
        Dim NewButton As New Button
        NewButton.Name = "Button1"
        NewButton.Top = 10
        NewButton.Text = "Boton 1"
        NewTab.Controls.Add(NewButton)
 
        AddHandler NewButton.Click, AddressOf ClickBotones
 
        Dim NewButton2 As New Button
        NewButton2.Name = "Button2"
        NewButton2.Top = 100
        NewButton2.Text = "Boton 2"
        NewTab.Controls.Add(NewButton2)
 
        AddHandler NewButton2.Click, AddressOf ClickBotones
    End Sub
 
    Private Sub ClickBotones(ByVal sender As Object, ByVal e As EventArgs)
        Dim whichButton As Button
        Dim whichTabPage As Control
 
        If TypeOf sender Is Button Then
 
            whichButton = CType(sender, Button)
            whichTabPage = whichButton.Parent
 
            MessageBox.Show("Apretaste el " & whichButton.Name & " de la pestaña " & whichTabPage.Name)
        End If
    End Sub
End Class

el primer boton añade un tab con 2 botones adentro y el otro elimina la tab seleccionada.

tambien se manejan los eventos click de cada boton y se sabe de que tab vino el click.

es un simple ejemplo, lo tenes que optimizar.

saludos.

la consulta SQL deberia ser asi:

SELECT * from MiTabla WHERE id = 'el id que ingresaste'

y despues no tendrias que recorrer nada, simplemente hacer.

If leerdato.Read()
     txtNombre.Text = leerdato("nombre")
End if

saludos.

Eso estaria bien, esos ficheros se leen/escriben como archivos normales o de otra forma? (Soy novato en C#, vengo de PHP) xD