SOMAR TODOS VALORES EM UM LIST

DELEON 28/07/2009 08:56:00
#318078
Pessoal, tava querendo somar todos os valores que tenho no listbox...
Lembro que uma vez vi esse cod aki, so não tenho ele mais....
Alguem poderia me ajudar?
TECLA 28/07/2009 09:02:18
#318080
No seu LISTBOX tem algum TEXTO adicionado, ou somente valores NUMéRICOS?
WILLVIDAL 28/07/2009 09:03:16
#318081
Resposta escolhida
Dim valor As Double
Dim i As Integer

For i = 0 To List1.ListCount - 1
valor = valor + List1.List(i)
Next i

Text2.Text = valor

seria isso ?
DELEON 28/07/2009 09:16:51
#318083
Não, não tem valor não Numerico Não...
Tópico encerrado , respostas não são mais permitidas