Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
List box.
Message
From
21/08/2001 12:16:03
Fernando Alvares
Independent
Brazil
 
 
To
20/08/2001 17:36:30
William Rice
Dakota Services, Inc
Hatfield, Pennsylvania, United States
General information
Forum:
Visual FoxPro
Category:
Other
Title:
Re: List box.
Miscellaneous
Thread ID:
00546465
Message ID:
00546820
Views:
17
Hi Willian,

Try this:
With ThisForm

     nListCount = .lstSelect.ListCount

     For I = 1 To nListCount
         lstSelected.AddItem  (lstSelect.List (1))
         lstSelect.RemoveItem (1)
     EndFor
     
EndWith
Hope it helps,

Fernando
"Porque a vida é um verdadeiro Drink no Inferno"
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform