Visual Basic - Buscar List1

Life is soft - evento anual de software empresarial
   
Vista:

Buscar List1

Publicado por Martin (2 intervenciones) el 30/07/2010 08:02:37
Hola, Buenas Noches

Miren Tengo una duda, Oacupo Hacer una aplicacion , Que Separe de una list1 , y lo mande a list2 , todo lo que contenga lo escrito en el text1, pero que funcione con un boton

por ejemplo

en la lista tengo

juan peres
juan camaney
alejandro camalion
perla ruiz
chino torres
jose perales

y en el text1 tengo "per"

doy click en el boton de "Buscar"

y en el list2 me agregue

juan peres
perla ruiz
jose perales

si me pudieran ayudar o explicar , porfavor :)

Gracias :)
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

RE:Buscar List1

Publicado por Jimmy T (134 intervenciones) el 30/07/2010 16:45:06
Hola se hace así:

Private Sub Command1_Click()
List2.Clear

For i = 0 To List1.ListCount - 1
List1.ListIndex = i

If InStr(1, List1.text, Text1.text, vbTextCompare) > 0 Then
List2.AddItem (List1.text)
End If
Next i
End Sub

Saludos!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Buscar List1

Publicado por Martin (2 intervenciones) el 30/07/2010 16:48:20
Asi de Facil??

Muchisimas Gracias :)

Cuando te vea te Invito un Refresco

ty
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Buscar List1

Publicado por Jimmy T (134 intervenciones) el 30/07/2010 17:06:54
Instr busca apartir de una posición un string dentro de otro, y devuelve la posición de la primera coincidencia.

y gracias por lo del refresco, Jajaja lo voy a tomar en cuenta ;)

Saludos!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar