hola a todos soy nuevo en el foro. y lo encontre bastante bueno para todos los informaticos del mundo. bueno voy al grano
explicare todo lo que estoy haciendo para que me entiendan mejor
tengo un form1 que donde ingreso los productos marcas, etc y se guardan en c:\Test\certamen.txt // dejo el codigo guardado
Dim sw As New StreamWriter("c:\Test\certamen.txt", True)
sw.WriteLine(tx_NombreP.Text & " ; " & tx_marcaP.Text & " ; " & tx_CodigoP.Text & " ; " & NU_PrecioP.Value & " ; " & cb_tipop.SelectedItem)
sw.Close()
limpiarDatos()
MsgBox("El Producto se Guardo Correctamente ", MsgBoxStyle.Information)
y me deja el txt guadado de esta forma cada linea
m&m ; ambrosoli ; 4a5678 ; 2600 ; chocolates
luego en un form2 tengo un boton mostrar todos los productos guardados en certamen.txt dentro de un listview // dejo el codigo
Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
If File.Exists("c:\Test\certamen.txt") Then
ListView1.Items.Clear()
Dim sr As New StreamReader("c:\Test\certamen.txt")
Dim linea = sr.ReadLine
Do While Not linea Is Nothing
Dim arreglo() As String = linea.Split(";")
ListView1.Items.Add(New ListViewItem(New String() {arreglo(0), arreglo(2), arreglo(1), arreglo(3), arreglo(4)}))
linea = sr.ReadLine
Loop
sr.Close()
Else
MsgBox("Error,No existen Productos.debe registrar algun producto", MsgBoxStyle.Critical)
End If
hasta aqui todo bien,pero cuando quiero hacer una busqueda de una palabra que fue ingresada por un textbox y buscar dentro del archivo .txt no me a funcionado ningun codigo que e visto en las librerias de microsoft
EJ: si en el textbox pusiera m&m y apreto el boton buscar tendria que encontrar
m&m ; ambrosoli ; 4a5678 ; 2600 ; chocolates o solamente m&m
ojala me ayuden!
