Your adding syntax is incorrect. You need to dimension as variable as ListItem, and then so a Set,:
VB Code:
  1. Dim MyItem As ListItem
  2. Set MyItem = ListView1.ListItems.Add(, , FieldName.Value)