GSerg » 29.12.2004 (Ср) 13:55
dim i as long, r as double
for i=0 to list1.listcount-1
r=r+cdbl(list1.list(i,2))
next
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас