ERRO EM LISTVIEW
Galera,
To com uma aplicação em que se soma uma coluna do Listview.
O erro é o famoso: [ô]Type mismatch[ô]
Meu código é esse:
[txt-color=#e80000]Dim SomaQuant As Currency
For i = 1 To ListaProdutos.ListItems.Count
SomaQuant = SomaQuant + CCur(ListaProdutos.ListItems(i).SubItems(3)) [ô]erro está nesta linha
Next
txtQuant.Text = SomaQuant[/txt-color]
Alguém sabe qual o problema.
VLW
To com uma aplicação em que se soma uma coluna do Listview.
O erro é o famoso: [ô]Type mismatch[ô]
Meu código é esse:
[txt-color=#e80000]Dim SomaQuant As Currency
For i = 1 To ListaProdutos.ListItems.Count
SomaQuant = SomaQuant + CCur(ListaProdutos.ListItems(i).SubItems(3)) [ô]erro está nesta linha
Next
txtQuant.Text = SomaQuant[/txt-color]
Alguém sabe qual o problema.
VLW
Poste os valores que estão na coluna do LISTVIEW.
Cara
Antes de postar aqui como o TECLA falou, tenta isto:
Em vez de [txt-color=#0000f0]SubItens[/txt-color]:
SomaQuant = SomaQuant + CCur(ListaProdutos.ListItems(i).[txt-color=#0000f0]SubItems[/txt-color](3))
coloca [txt-color=#0000f0]ListSubItens[/txt-color]:
SomaQuant = SomaQuant + CCur(ListaProdutos.ListItems(i).[txt-color=#0000f0]ListSubItems[/txt-color](3))
Se não der certo, verifique se você está se referenciando à coluna que realmente contém os valores
valeu
Antes de postar aqui como o TECLA falou, tenta isto:
Em vez de [txt-color=#0000f0]SubItens[/txt-color]:
SomaQuant = SomaQuant + CCur(ListaProdutos.ListItems(i).[txt-color=#0000f0]SubItems[/txt-color](3))
coloca [txt-color=#0000f0]ListSubItens[/txt-color]:
SomaQuant = SomaQuant + CCur(ListaProdutos.ListItems(i).[txt-color=#0000f0]ListSubItems[/txt-color](3))
Se não der certo, verifique se você está se referenciando à coluna que realmente contém os valores
valeu
Provavelmente vc está tentando converter algo inválido ou a célula está vazia ....
Tópico encerrado , respostas não são mais permitidas