Buenas colegas!
La cuestion ahora es , es posible asignar a cada item de un listview una imagen diferente?, como lo logro?, gracias de antemano.
SI en la linea que agregas un nuevo valor al listview pones en [Icon] la ruta del icono, y en [SmallIcon] pones la vista en miniatura o la misma, tambien tenes que configurar para que soporte imagenes, en una de las solapas, tiene 3 opciones a las 3 les pones un valor diferente a ninguna.
PD: eso con el listivew version 6, si no te anda avisa
Sancho.Mazorka :P
Hola Sancho, gracias por tu tiempo, econtre esta rutina en otra web que la comparto con todos por si les sirve:
Dim ch As ColumnHeader Dim li As ListItem
With ListView1 .View = lvwReport ' le asignamos el control Image .SmallIcons = ImageList1 ' añadimos columnas y le ponemos el título Set ch = .ColumnHeaders.Add(, , "Alumno", 800) Set ch = .ColumnHeaders.Add(, , "Nombre y apellidos", 3500) Set ch = .ColumnHeaders.Add(, , "Aula", 2200) ' cargamos algunos datos en el LV y le añadimos la imagen Set li = .ListItems.Add(, , "001") li.SmallIcon = 1 li.SubItems(1) = "Antonio Pérez Hernández" li.SubItems(2) = "Bio-Química" Set li = .ListItems.Add(, , "002") li.SmallIcon = 2 li.SubItems(1) = "Juan Roberto Otero Camacho" li.SubItems(2) = "Física Nuclear" Set li = .ListItems.Add(, , "003") li.SmallIcon = 3 li.SubItems(1) = "María Jesús Mohedano García" li.SubItems(2) = "Prácticas de laboratorio" End With
Pueden cerrar el tema, gracias por todo.
De nada mdg! Sirvio ese ejemplo no... ?
Sancho.Mazorka :P
Mirate esto (http://www.recursosvisualbasic.com.ar/htm/tutoriales/control-imagelist.htm) y [img=http://www.recursosvisualbasic.com.ar/htm/tutoriales/control-listview.htm]http://esto[/img] para una info mas completa.
1S4ludo