LISTVIEW - CONTEUDO DA LINHA

USUARIO.EXCLUIDOS 19/03/2004 14:54:03
#16151
Preenchi meu listview:

While Not rsRecordSet.EOF
Set itemlst = listviewCidades.ListItems.Add(, , rsRecordSet("codcidade"))

itemlst.SubItems(1) = rsRecordSet("sigla")
itemlst.SubItems(2) = rsRecordSet("cidade")

rsRecordSet.MoveNext
Wend

Agora preciso saber o comando para capturar o rsRecordSet("cidade"), da linha selecionada:

Private Sub listviewCidades_Click()
msgbox ? ? ?
End Sub
USUARIO.EXCLUIDOS 19/03/2004 14:57:54
#16153
Resposta escolhida
if not lstviewCidades.selecteditem is nothing then
msgbox listviewCidades.selecteditem.subitems(2)
end if
USUARIO.EXCLUIDOS 19/03/2004 16:09:31
#16187
neste caso eu faria um pouco diferente...

Set itemlst = listviewCidades.ListItems.Add(,"C" & rsRecordSet("codcidade") , rsRecordSet("codcidade"))
para adicionar o item

para selecionar:
set listviewcidades.selecteditem = listviewcidades.listitems("C5")

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