BUSCAR O ID DO ITEM ESCOLHIDO NUM LISTBOX
Galera, olha só...
Fiz um form para pesquisa, onde posso buscar pela matrÃcula OU pelo nome.
O resultado dessa pesquisa é exibida num listbox. Até aà blz...
O problema é q eu concatenei os dois campos (matr - nome), e cada linha recebe os dois valores, e agora quero pegar somente a matrÃcula.
Como eu faço? [S57]
Queria saber se tem como eu pegar pelo listbox.listindex?
Tipo, conforme vai adicionando um item no list, eu guardar a matricula por index. Pois qdo tento exibir a matrÃcula, vem só a última da lista! [S70]
Desde já agradeço!
Beijos a todos!
Fiz um form para pesquisa, onde posso buscar pela matrÃcula OU pelo nome.
O resultado dessa pesquisa é exibida num listbox. Até aà blz...
O problema é q eu concatenei os dois campos (matr - nome), e cada linha recebe os dois valores, e agora quero pegar somente a matrÃcula.
Como eu faço? [S57]
Queria saber se tem como eu pegar pelo listbox.listindex?
Tipo, conforme vai adicionando um item no list, eu guardar a matricula por index. Pois qdo tento exibir a matrÃcula, vem só a última da lista! [S70]
Desde já agradeço!
Beijos a todos!
o jeito mais simples é acertar na carga do listbox a propriedade ItemData
a cada item que adicionar acerte o ItemData com o número da matrÃcula
exemplo:
list1.additem "TESTE"
list1.ItemData(List1.NewIndex) = 123
desta forma, qdo precisar pegar o número de matrÃcula você pode usar:
Matricula = List1.ItemData(List1.ListIndex)
a cada item que adicionar acerte o ItemData com o número da matrÃcula
exemplo:
list1.additem "TESTE"
list1.ItemData(List1.NewIndex) = 123
desta forma, qdo precisar pegar o número de matrÃcula você pode usar:
Matricula = List1.ItemData(List1.ListIndex)
Valeu a idéia! Eu realmente não tinha tido esta idéia!
...Mas esqueci de dizer q a matrÃcula é alfa numérica, de modo de dá conflito no Ãndice! [S55]
Se tiver outra idéia, mesmo q não envolva listbox, eu aceito! hehehehe
De qq forma, vlw!
[S82] [S67]
...Mas esqueci de dizer q a matrÃcula é alfa numérica, de modo de dá conflito no Ãndice! [S55]
Se tiver outra idéia, mesmo q não envolva listbox, eu aceito! hehehehe
De qq forma, vlw!
[S82] [S67]
Tente utilizar a função Instr e Mid, para delimitar oa mátrÃcula e o nome, por ex.:
Private Sub Command1_Click()
Dim iMat As Long
Dim sMat As String
iMat = InStr(1, Me.List1.Text, "-")
sMat = Mid(Me.List1.Text, iMat + 1)
Me.Text1.Text = Trim(sMat)
End Sub
Private Sub Form_Load()
With Me.List1
.AddItem "João Carlos - 1AD302"
.AddItem "João Cesar - 32D562"
.AddItem "João Marcos- 36SD56"
.AddItem "Roberto - AE1D2F"
.AddItem "Tenório - 1AS25D"
End With
End Sub
Private Sub Command1_Click()
Dim iMat As Long
Dim sMat As String
iMat = InStr(1, Me.List1.Text, "-")
sMat = Mid(Me.List1.Text, iMat + 1)
Me.Text1.Text = Trim(sMat)
End Sub
Private Sub Form_Load()
With Me.List1
.AddItem "João Carlos - 1AD302"
.AddItem "João Cesar - 32D562"
.AddItem "João Marcos- 36SD56"
.AddItem "Roberto - AE1D2F"
.AddItem "Tenório - 1AS25D"
End With
End Sub
Caraca, galera!
A ajuda de vcs me clareou "as idéias"! rsrsrsrsr
Mas acabei resolvendo da seguinte forma: [S25]
Coloquei mais um listbox, sendo esse invisÃvel, e recebendo só as matrÃculas...
No evento click do list que retorna o resultado da pesquisa, com matrÃcula e nome, eu fiz o seguinte:
Mat = lstMat.List(lstResultado.ListIndex)
Pegando assim, a matricula da posição escolhida pelo usuário! [S27][S37][S79][S93][S85][S98]
Mas, de qq forma, vcs me ajudaram e aumentaram meu conhecimento!
Valeu mesmo! [S71][S67]
A ajuda de vcs me clareou "as idéias"! rsrsrsrsr
Mas acabei resolvendo da seguinte forma: [S25]
Coloquei mais um listbox, sendo esse invisÃvel, e recebendo só as matrÃculas...
No evento click do list que retorna o resultado da pesquisa, com matrÃcula e nome, eu fiz o seguinte:
Mat = lstMat.List(lstResultado.ListIndex)
Pegando assim, a matricula da posição escolhida pelo usuário! [S27][S37][S79][S93][S85][S98]
Mas, de qq forma, vcs me ajudaram e aumentaram meu conhecimento!
Valeu mesmo! [S71][S67]
Tópico encerrado , respostas não são mais permitidas