coba spt ini mas,

dim total as double
total=0

do while rs.eof = false
   total = total + rs!total
   rs.movenext
loop

text3.text = total


nb : test dulu mas krn ini instant jawabnya blm dicoba :-)


salam
lilis

Kirim email ke