Togli la parentesi dopo add
ListView1.ListItems.Add , , CStr(tony(0))