Cargar TxT en List Box Vb.NeT

Iniciado por _Bj0rD_, 17 Abril 2007, 23:40 PM

0 Miembros y 1 Visitante están viendo este tema.

_Bj0rD_

Hola kisiera saber como cargar un txt en forma de lista

Citar
hola
mira
corre
omar

y que lis pase a un list box en vb.net pero al darle click al boton load que pida buscar el txt en tu pc

alguien que me pueda facilitar la informacion ya que yo no encuentro mucho acerca de .net


53 69 6D 70 6C 79 20 54 68 61 20 42 65 73 74 20 5F 42 6A 30 72 44 5F

_Bj0rD_

ese es el codigo que tengo pero no lo mete al listbox :(
CitarPrivate Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim ofD As New OpenFileDialog
        If ofD.ShowDialog() = DialogResult.OK Then
            Dim sr As New System.IO.StreamReader(ofD.FileName, System.Text.Encoding.Default, True)
            LstBox.Text = sr.ReadToEnd()
            sr.Close()
        End If
    End Sub


53 69 6D 70 6C 79 20 54 68 61 20 42 65 73 74 20 5F 42 6A 30 72 44 5F

_Bj0rD_

Miren ya me salio tenia un problema y lo resolvi metiendolo a un richtextbox pero ahora como cambio el boton agregar pero en vez de que sea al list box que lo mande a richtextbox????


CitarPrivate Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If TextBox1.Text <> "" Then
            LstBox.Items.Add(TextBox1.Text)
            Label1.Text = LstBox.Items.Count & " elemento(s)"
            TextBox1.Text = ""
        End If
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim ofD As New OpenFileDialog
        If ofD.ShowDialog() = DialogResult.OK Then
            RichTextBox1.LoadFile(ofd.FileName, RichTextBoxStreamType.PlainText)
        End If
    End Sub


53 69 6D 70 6C 79 20 54 68 61 20 42 65 73 74 20 5F 42 6A 30 72 44 5F