kresh

Para pasarlo al ListView debe ser así ListView1. ListItems. Add 1,, NOLISTA Donde el 1 es index, el 2 valor nullo y el 3 el texto a agregar. Espero sacarte la duda,

Bueno yo trabajo con el DAO no soy muy experta en programación. Gracias por tu ayuda

Muchas gracias por tu atención

Gracias parce me ha sido de mucha ayuda para mi proyecto.

Siento el retraso, ando con poco tiempo,

Ok muchas gracias

Dim b As Byte Private Sub BUSCAR_Click() b = 0 BASE.Refresh BASE.Recordset.MoveFirst While Not BASE.Recordset.EOF If BASE.Recordset.Fields("codigo") = COD.Text Then DES.Text = BASE.Recordset.Fields("descripcion") FEC.Text =...

Gracias Por La Respuesta

aaahh ok.... miiil graciaas.. me sirviooo full.. ciertamente tienes razon... lo coloque como me dijiste y funciono perfectamente... Mil graciass.!!!! =D Saludos..

Excelente, muchas gracias experto.