Busqueda en ListBox desde TextBox (Al estilo de la Ayudas) 
Los valores del ListBox provienen de una tabla en este caso, pero pueden provenir de cualquier origen de datos. Primero creamos un formulario y agregamos un TextBox y un ListBox 


En el evento InteractiveChange del TextBox programamos lo siguiente: 
LOCAL nIndex


FOR nIndex  = 1 TO Thisform.List1.ListCount 

       IF UPPER( Thisform.List1.ListItem(nIndex) ) = UPPER( ALLTRIM( this.Value ) )
            Thisform.List1.ListIndex  =  nIndex 
            EXIT 

      ENDIF

ENDFOR

Thisform.List1.Refresh