Visual Basic - ayuda urgente please

hola necesito que alguien me ayude por favor
tengo que sumar los valores que estan en una columna de un listview y lo que hice no anda por favor alguien que me ayude

Holas

For X = 1 To ListView1.ListItems.Count
A = A + Val(ListView1.ListItems.Item(X))
Next