Hola.
Tengo el siguiente codigo que lo que hace es, con un Button, guardar los datos de un ListView en un archivo XML y, con otro Button, recupera dichos datos en el ListView.
Imports System.Xml
Public Class Form1
#Region "XML"
Sub Me_Loads() Handles Me.Load
With ListView1
.GridLines = True
.View = View.Details
'.Focus()
.Columns.Add("NOMBRE", -2, HorizontalAlignment.Left)
.Columns.Add("APELLIDO", -2, HorizontalAlignment.Left)
.Columns.Add("EDAD", -2, HorizontalAlignment.Left)
.Columns.Add("DIRECCION", -2, HorizontalAlignment.Left)
.Columns.Add("PAIS", -2, HorizontalAlignment.Left)
.Columns.Add("CIUDAD", -2, HorizontalAlignment.Left)
.Columns.Add("TELEFONO", -2, HorizontalAlignment.Left)
End With
End Sub
Private Sub BtGuardar_Click() Handles BtGuardar.Click
Dim x As New XmlTextWriter("ListaDeAmigos.xml", System.Text.Encoding.ASCII)
Dim i As Integer
x.WriteStartDocument()
x.WriteStartElement("Amigos")
i = ListView1.Items.Count
For Each lvi As ListViewItem In ListView1.Items
x.WriteStartElement("Lista")
i = ListView1.Items.Count = i - 1
x.WriteElementString("Nombre", lvi.Text)
x.WriteElementString("Apellido", lvi.SubItems(1).Text)
x.WriteElementString("Edad", lvi.SubItems(4).Text)
x.WriteElementString("Direccion", lvi.SubItems(3).Text)
x.WriteElementString("Pais", lvi.SubItems(4).Text)
x.WriteElementString("Ciudad", lvi.SubItems(5).Text)
x.WriteElementString("Telefono", lvi.SubItems(6).Text)
x.WriteEndElement()
Next
x.WriteEndDocument()
x.Close()
End Sub
Sub BtCargar_Click() Handles BtCargar.Click
Try
ListView1.Items.Clear()
Dim XMLDoc As New Xml.XmlDocument
XMLDoc.Load("ListaDeAmigos.xml")
For Each node
As Xml.XmlNode In
XMLDoc.SelectNodes("Amigos/Lista")
Dim lvItem As ListViewItem
lvItem = ListView1.Items.Add(node.Item("Nombre").InnerText)
lvItem.SubItems.Add(node.Item("Apellido").InnerText)
lvItem.SubItems.Add(node.Item("Edad").InnerText)
lvItem.SubItems.Add(node.Item("Direccion").InnerText)
lvItem.SubItems.Add(node.Item("Pais").InnerText)
lvItem.SubItems.Add(node.Item("Ciudad").InnerText)
lvItem.SubItems.Add(node.Item("Telefono").InnerText)
Next
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
#End Region
End Class Mi pregunta es: Como puedo al cargar los datos en el ListView, que el BackColor del SubItem "Edad" de cada Item sea del color especificado con codigo, Ej.#FF00FF, en otro SubItem del mismo ListView?
Muchas gracias.
Att.
[Editado: 0riundo, 14/12/2011 00:24:20]