[VB6] Prelevare stringhe da ListBox

[tarantino]

Salve ragazzi io popolo una listbox con alcuni dati, vorrei prelevare solo alcune stringhe come faccio?
ad esempio:

sh_pippo
sh_pluto
pk_topo
cn_livo
sh_papero

in questo caso vorrei prelevare solo le stringhe sh

[oregon]

Le devi cercare nella listbox

[Boolean]

fai un ciclo su tutti gli item della listbox, usa la proprietà List per sapere il valore di ogni item, e la funzione InStr, per vedere se la stringa che cerchi è contenuta nel testo dell'item

Boolean

[tarantino]

mi potresti per caso aiutare ,grazie

[oregon]

Cosa non sai fare dei passi suggeriti ?

[tarantino]

fare il ciclo

[Boolean]

For i = 0 to List1.ListCount-1
...
...
...
Next i

Boolean

[MdE2005]

Potresti memorizzare le stringhe che cerchi in un'ulteriore listbox (non so che uso ne vuoi fare..):

Private Sub Command1_Click ()

Dim StringadaCercare As String
Dim ListItem As String

StringadaCercare = "sh"

For i = 0 To List1.ListCount - 1
ListItem = InStr(1, List1.List(i), StringadaCercare, vbTextCompare)
If ListItem = 1 Then 'la stringa è presente
List2.AddItem List1.List(i)
End If
Next i

End Sub

poi fammi sapere..ciao

[tarantino]

Grazie mi è servito, adesso ho un altro problema pero', dovrei riuscire ad estrapolare la stringa non appena vede una virgola,cioè
se io avessi :
pippo,pluto, toplino
paperino,poeiee,orjncc
ziopaperone,dduidnd,podnmd

mi piacerebbe estrarre solo i primi quindi pippo, paperino e ziopaperone. Gli dovrei dire appena trovi una virgola stampami a video il primo nome no?ma non so come fare

[oregon]

Sempre nel ciclo, utilizza la funzione Instr per trovare la virgola.