[AccessD] Listbox question -OOPs

I gave you the code for de-selecting.  Here's the code for selecting

    Dim varItm As Variant
    
    If lstDealer.ListCount - 1 = 0 Then
        MsgBox "There are no Dealers on the List"
    Else
 
        For varItm = 0 To lstDealer.ListCount - 1
            lstDealer.Selected(varItm) = True
        Next varItm
    End If

John V. Ruff - The Eternal Optimist :-)
Always Looking For Contract Opportunities

Home: 253.588.2139
Cell: 253.307.2947
9306 Farwest Dr SW
Lakewood, WA 98498

"Commit to the Lord whatever you do,
                and your plans will succeed." Proverbs 16:3



-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Arthur Fuller
Sent: Monday, May 26, 2003 6:54 AM
To: AccessD
Subject: [AccessD] Listbox question


How do you programmatically select all items in a listbox?

TIA,
Arthur

_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com