|
Título: Cargar TxT en List Box Vb.NeT Publicado por: _Bj0rD_ en 17 Abril 2007, 23:40 pm 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 Título: Re: Cargar TxT en List Box Vb.NeT Publicado por: _Bj0rD_ en 18 Abril 2007, 06:42 am ese es el codigo que tengo pero no lo mete al listbox :(
Citar 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 Dim sr As New System.IO.StreamReader(ofD.FileName, System.Text.Encoding.Default, True) LstBox.Text = sr.ReadToEnd() sr.Close() End If End Sub Título: Re: Cargar TxT en List Box Vb.NeT Publicado por: _Bj0rD_ en 18 Abril 2007, 20:13 pm 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????
Citar Private 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 |