Buscar dato de un List1 desde un boton

[FTech]

También podrías hacerlo asi:

Código VB:

Dim bus As String
Dim i As String
Dim enc As Boolean
i=0
enc=FALSE
bus="HOLA"
while i<List1.ListCount AND NOT enc
         if List1.List(List1.ListIndex)=bus then
                enc=TRUE
         end if
         i=i+1
wend
 

David gracias por el EXIT FOR, no lo conocía.

Un saludo