RECUPERAR VALOR LISTVIEW

MITSUEDA 04/11/2010 09:40:33
#356601
Saudações a todos,

Sou iniciante em VB.NET e estou apanhando para conseguir recuperar um valor de uma listview, utilizo o seguinte codigo para popular

Private Sub preecheGrdClassificacao()
Me.lsv_Classificacao.Items.Clear()
Try
[ô]Instancia o objeto para incluir
Dim objIncluir As New cls_BDados()

[ô]Passando criterio para consulta
Dim strCriterio As String = Me.lst_Produto.SelectedValue.ToString

[ô]Criando e populando uma datatable
Dim dt As DataTable = objIncluir.ClassifiqueProduto(strCriterio)

With dt
Dim r As DataRow
Dim lSingleItem As ListViewItem
For Each r In dt.Rows
lSingleItem = Me.lsv_Classificacao.Items.Add(r(0))
For col As Integer = 1 To dt.Columns.Count - 1
lSingleItem.SubItems.Add(r(col).ToString)
Next
Next
End With

Catch ex As Exception
Throw ex
End Try
End Sub

Agora como eu consigo recuperar o valor que está no listview

Eu tentei

Me.lsv_Classificacao.FocusedItem.SubItems(0).Text

Mas da erro.

Obrigado
JONATHANSTECKER 04/11/2010 09:46:57
#356603
Resposta escolhida
  Private Sub lsv_Classificacao_ItemSelectionChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.ListViewItemSelectionChangedEventArgs) Handles lsv_Classificacao.ItemSelectionChanged
MsgBox(Me.lsv_Classificacao.Items(e.ItemIndex).SubItems(0).Text)
End Sub
JONATHANSTECKER 04/11/2010 09:50:58
#356605
Dê uma olhada neste artigo... Me ajudou bastante...

listviews_36_utilidades_directas
MITSUEDA 04/11/2010 10:51:28
#356616
Jonathan,

Obrigado.

Mas eu não tenho esse evento na minha listview,

Estou utilizando vb 2010

O unico que eu tenho é esse
Private Sub lsv_Classificacao_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lsv_Classificacao.SelectedIndexChanged

End Sub

Se eu utilizo esse codigo

With Me.lsv_Classificacao
MsgBox(.Items(.FocusedItem.Index).SubItems(0).Text)
End With

Em um botão dou click funciona perfeitamente, mas no evento acima não

Obrigado mais uma vez
JONATHANSTECKER 04/11/2010 11:03:55
#356619
Dessa forma deve funcionar:

Private Sub lsv_Classificacao_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lsv_Classificacao.SelectedIndexChanged
Try
MsgBox(Me.lvwUsuarios.SelectedItems(0).SubItems(0).Text)
Catch ex As Exception

End Try
End Sub


Mas eu realmente recomendo usar no evento [Ô]ItemSelectionChanged[Ô].
é só você deixar a seta do mouse dentro de algum evento da ListView e alterar o evento na ComboBox do Visual Studio. (Conforme anexo)

[txt-color=#e80000]*** Alteração: Faltou anexo.[/txt-color]
MITSUEDA 04/11/2010 12:30:48
#356632
Putz,

Verdade cara, eu to tão acostumado com o SelectionChnaged, que estava procurando na letra [Ô]S[Ô], rs...

Bom, funcional sim...

Muito obrigado.

Abraços
Tópico encerrado , respostas não são mais permitidas