datos en listbox
tengo el siguiente codigo en el form_load:
private sub form_load()
dim sistema as database
dim nombre as recordset
set sistema = Workspaces(0).Opendatabase(App.Path & "Sistema.mdb")
set nombre = sistema.Openrecorset("productos",dbOpenTable)
dim cadena as string
If nombre.recordcount > 0 then
nombre.movefirst
do while Not nombre.EOF
cadena= nombre!Nombre_del_Producto & Chr(9)
ListaIF.AddItem cadena
nombre.MoveNext
loop
end if
end sub
********************************
ok
con esto cargo los datos del campo "nombre_del_Producto" al cargar el el listbox...chevere hata aca, el problema es que solo quiero que se muestre los nombres del campo "Nombre_del_producto" PERO QUE EN EL CAMPO "TIPO" SEA = "INFORMATICO" , es decir mi tabla tiene varios campos entre ellos los campos (nombre y tipo), en el campo tipo almaceno datos segun el tipo de producto, por ejemplo, si el producto es de tipo infromatico, en el campo tipo se guarda " Informatico", si el producto es administrativo, se guarda el texto" Administrativo", lo que quiero es que al seleccionar en el combo la option Infornatico, en el listbox se muestre solo los nombres que estan en el campo "Nombre" pero que en el campo "Tipo" sea = " Informatico"
SI ME PUEDEN AYUDAR SE LOS AGRADEZCO....
SALUDOS..........