Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Running down a listbox
Message
From
24/03/2004 09:46:23
 
 
To
24/03/2004 09:25:08
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00889225
Message ID:
00889244
Views:
18
Hi Kurt,
cText=""
thiform.lockscreen=.t.
myoldidx = ThisForm.lbxListbox.listindex
FOR iCounter = 1 TO ThisForm.lbxListbox.ListCount
  ThisForm.lbxListbox.listindex=iCounter
  cText=cText + alltrim(ThisForm.lbxListbox.value) + CHR(13)
ENDFOR
ThisForm.lbxListbox.listindex = myoldidx
thiform.lockscreen=.f.
HTH

Claudio
"Now to him who is able to do immeasurably more than all we ask or imagine, according to his power that is at work within us, Ephesians 3:20
Previous
Reply
Map
View

Click here to load this message in the networking platform