questo è il mio attuale codice


dim st as string
dim a as integer=0
dim conto as datagriditem
for each conto in somma_pagato.items
st=ctype(conto.findcontrol("pagato"),label).text
if (isnumeric(st)) then
a=st+a
end if
next