If there is no other way to scan through the list entries, you can always lock the screen. The will hide the scrolling and avoid the paint hits.

cText=""
thisform.LockScreen = .t.
FOR iCounter = 1 TO ThisForm.lbxListbox.ListCount
  ThisForm.lbxListbox.listindex=iCounter
  cText=cText + alltrim(ThisForm.lbxListbox.value) + CHR(13)
ENDFOR
thisform.LockScreen = .f.

>Hi,
>
>I have the following code :
>
>cText=""
>FOR iCounter = 1 TO ThisForm.lbxListbox.ListCount
> ThisForm.lbxListbox.listindex=iCounter
> cText=cText + alltrim(ThisForm.lbxListbox.value) + CHR(13)
>ENDFOR
>
>The code works fine... the only problem i have is that when the code runs on a form the listbox scroll when the pointer is running down the listbox. Thats normal but not so clean to see for the user.
>
>Is it possible to run down the list and get the information avoiding that the listbox is scrolling down ?
>
>Thnx