How to Update Item in ListView in Vb 6.0

Hello Guys,, I need Your help..
I Have A Code to Adding Item in Listview but I dont know how to update the Date.. Heres My Code

Code:

---

ListView1.ListItems.Add , , lblrp.Caption
ListView1.ListItems.Item(ListView1.ListItems.Count).ListSubItems.Add , , txtCode.Text
ListView1.ListItems.Item(ListView1.ListItems.Count).ListSubItems.Add , , txtproductname.Text
ListView1.ListItems.Item(ListView1.ListItems.Count).ListSubItems.Add , , txtqty.Text
ListView1.ListItems.Item(ListView1.ListItems.Count).ListSubItems.Add , , txtprice.Text
ListView1.ListItems.Item(ListView1.ListItems.Count).ListSubItems.Add , , lbltotal.Text
ListView1.ListItems.Item(ListView1.ListItems.Count).ListSubItems.Add , , MDIForm1.lbldate.Caption

---

Guys, Give some Advice How to Do that.. Thanks in Advance..

My Problem is How to Update the Item in Listview ...

Try next way

Code:

---

  Dim LI              As MSComctlLib.ListItem
 
  Set LI = ListView1.ListItems.Add(, , lblrp.Caption)
      LI.SubItems(1) = txtCode.Text
      LI.SubItems(2) = Trim(TBolseU!Calibre)
      LI.SubItems(3) = txtproductname.Text
      LI.SubItems(4) = txtqty.Text
      LI.SubItems(5) = lbltotal.Text
      LI.SubItems(6) = MDIForm1.lbldate.Caption

---