Visual Basic - Consulta inversa

Life is soft - evento anual de software empresarial
   
Vista:

Consulta inversa

Publicado por ana (24 intervenciones) el 11/09/2009 01:15:02
hola chicos genios, no em considero buena programadora sino leve, pero ahora si me tope con una pared fuera de mi imaginacion, alomejor es imposible de hacer o capaz y es asgo sencillo , no se ustedes diganme porke no hayo la salida

estoy haciendo una consulta a una tabla donde mando llamar nombres la tabla esta dos dos asi

list 1 (lista de citas) list 2 ( terminados)

karen 21/01/2009 karen 01/01/2000
caro 15/02/2009 ruben 01/01/2000
karen 01/01/2000 ---
ruben 05/03/2009
karen 10/02/2009
caro 15/11/2009
ruben 01/01/2000 ---
martha 23/05/2009

y como se ve, se repiten algunos nombres pero con fechas diferentes de sus citas,
al mandarlos llamar a un list box salen repetidos pero con un distinct se corrige. hasta ahi vamos bien.

muy bien, en el list2 salen los que tienen la marca (o fecha de referencia para identificarlos como terminados "01/01/2000")

mi gran pared es: como hago que si ya estan marcados como terminados, se kiten del list 1? (digo, porke ya no se les dara seguimiento asi ke no los debo de ver ahi.)

no le hayo, tengo dias buscando y nada, ayudenme porfavor !!! esta es la parte mas importnte de mi sistema y no se como hacerla :(
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:Consulta inversa

Publicado por juan carlos (518 intervenciones) el 11/09/2009 03:05:48
hola ana, este codigo removera todo registro que tenga 01/01/2000 de tu list1 lo prove poniendo este codigo en un command1

For I = 0 To List1.ListCount - 1
If InStr(List1.List(I), "01/01/2000") <> 0 Then List1.RemoveItem (I)
Next

espero que esto solucione tu problema
contactame a
mega.juca@hotmail.es
si te sirvio el codigo
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