Listview??

Kan nån hjälpa mig med följande.

Jag har följande kod för en listview:

With lstWAgrement.ColumnHeaders
    .Add , , "Value ", 500
    .Add , , "Description", 4000
    .Add , , "", 200
End With


Do While Not recdatSrvChk.EOF
           
    Set itmx = lstWAgrement.ListItems.Add(, , strValue)
    itmx.SubItems(1) = recdatSrvChk("Description")
    
    itmx.SubItems(2) = recdatSrvChk("defval_id")

Jag vill nu ha tag ivärdet som ligger på följande

Set itmx = lstWAgrement.ListItems.Add(, , strValue)

Hur får jag det? Det första värdet jag kan fånga upp är ju:

lstWAgrement.ListItems(iList).SubItems(1)

Hur jag tag det värdet jag har add på?