Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
List box.
Message
De
21/08/2001 12:16:03
 
 
À
20/08/2001 17:36:30
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
Divers
Thread ID:
00546465
Message ID:
00546820
Vues:
12
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
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform