Ayuda con ListView (muy facil)

Cristian
29 de Diciembre del 2003
Acabo de empezar a tocar un poco este control y me tope con un problema.
Se que la pregunta es mucho muy estupida per bue jeje no la se.
Tengo un listview con 3 columnas.
Cuando intento agregar datos lo hago de la siguiente manera:

Private Sub Form_Load()
ListView1.ListItems.Add , , "Columna 1 Fila 1"
ListView1.ListItems.Add.SubItems(1) = "Columna 2 Fila 1"
ListView1.ListItems.Add.SubItems(2) = "Columna 3 Fila 1"
End Sub

Pero el resultado es en distintas filas, es decir me aparece "Columna 1 fila 1" en la fila 1 , "columna 2 fila 1" en la fila 2 y "columna 3 fila 1" en la fila 3 , yo quiero que me aparescan las tres frases en la misma fila pero en distintas columnas.
como tendria que poner para que me aparesca cada frase en distintas columnas pero en la misma fila?
Un saludo

RAFA
29 de Diciembre del 2003
Hola Cristian.
Al cargar los datos en la columna 2 y siguientes, debes poner:
si no tienes creadas las columnas:
ListView1.ListItems(1).ListSubItems.Add = 1,,"Columna 2 Fila 1"
Si ya estan creadas:
ListView1.ListItems(1).subitems(1)="Columna 2 Fila 1"

Suerte


Cristian
29 de Diciembre del 2003
Rafa , intente con tu codigo de todas formas pero me da el error "index out of bonds"

rafa
29 de Diciembre del 2003
Perdona Cristian, antes me confundi con el codigo.
Pruebalo asi
debes poner en las propiedades del listview la propieada view a 3 (report)
With lw
.ColumnHeaders.Add ' ,,"nombre"
.ColumnHeaders.Add ' ,, "nombre"
.ColumnHeaders.Add
.ListItems.Add , , "uno"
.ListItems(1).ListSubItems.Add , , "uno-dos"
.ListItems(1).ListSubItems.Add , , "uno-tres"
.ListItems.Add , , "dos"
.ListItems(2).ListSubItems.Add , , "dos-dos"
.ListItems(2).ListSubItems.Add , , "dos-tres"
End With

Cristian
29 de Diciembre del 2003
Muchisimas gracias rafa , este ultimo si funciona ;)
Un saludo