Selecting Items in List Box control programmatically...

[bs2527]

Hi ,

I have created list box with the property Multiselect= 2-extended.
I thought I can select more than one Item in the list box programmaticaly using the following code, but it is not working.

For i= 2 to SelctedVal

retval = SendMessage(lstNotLinked.hWnd, LB_SETSEL,
ByVal CLng(1), ByVal CLng(i))

Next i


Can some body please tell me whether it is possible OR not.

Since I am new to VB, I am not very sure of VB 6.0 capabilities.


If any of you know how to select the list box items (more than one) programmatically then please let me know.

Thank You very much........

[chrisjk]

Is there any particular reason you are using API, as this will do

For i = 0 To List1.ListCount - 1 Step 2 'select every other element
    List1.Selected(i) = True
Next i

[bs2527]

The foloowing code just select the item, but the items do not get hilighted in the list box. i.e I wanted to see those selcetd Items (List1.Selected(i) = True) as hilighted in the list box.

For i = 0 To List1.ListCount - 1 Step 2 'select every other element
List1.Selected(i) = True
Next i

Thank you...
SESHU

[chrisjk]

It does highlight them, provided MultiSelect is set to Simple or Extended

[bs2527]

It is Multiselect is Extended

[bs2527]

But, I am doing it in on click event of the same list box , does it causes any problem?

Thanks

[chrisjk]

[chrisjk]

Originally posted by bs2527
But, I am doing it in on click event of the same list box , does it causes any problem?

No that doesn't appear to cause a problem

[bs2527]

Here is my problem,

I have list box with few items, If user selects one Item say 1,
then the program will automatically selects 4,5 & 6(Hilights). The selection logic for 4,5 &6 I kept in the on click event for 1, but

It is not working...


Hope you understand my problem...

[bs2527]

I have tried that also, but no luck!!!!!!

Is there any way to do it by generating the event for Shift key + selection , programmatically..

Thanks for your help.

[beachbum]

What do you mean no luck? The code works fine for me. U have set the MultiSelect property to 1 havent u?
what exactly is not working?
Regards
Stuart