How to get string of each selected item in Listbox (MultiSimple)

Question

0.00/5 (No votes)

See more:

, +

Hi there,

I've got a Listbox where SelectionMode = MultiSimple and I'd like to check the strings they contain to follow up with according actions (see Snippet) for each.

What I've tried so far:

VB

For Each selecteditem As [Object] In ListBox1.SelectedItems
    If ListBox1.SelectedItem.ToString = "Text 1" Then
        Action 1
    ElseIf ListBox1.SelectedItem.ToString = "Text 2" Then
        Action 2
    ElseIf ListBox1.SelectedItem.ToString = "Text 3" Then
        Action 3
    End If
Next

The problem: While the For...Next Statement is executed for each item that is selected (If I select 3 items it's executed 3 times, if I select 2 it's executed 2 times, etc) but I think iBlade.ListBox2.SelectedItem.ToString only returns the first item I select.

If I select "Text 1", "Text 2" and "Text 3" the Action ("Action 1") for "Text 1" is executed three times. If I select "Text 2" and "Text 3" the Action ("Action 2") for "Text 2" is repeated two times and so on...

What I'd like to happen is for "Action 2" and "Action 3" each to be executed once. But I can't really figure it out.

Posted 2-May-12 22:38pm

Saufkumpel

Updated 2-May-12 22:45pm

v2

Add a Solution

Comments

Sandeep Mewara 3-May-12 4:42am

1. What is iBlade
2. You loop through multiple ListBox1.SelectedItems but you never user the loop item. Instead, you use one item for comparison. Your logic for the code looks messy. Resolve it and you should be good to go.

Maciej Los 3-May-12 4:48am

Exactly!

[no name] 3-May-12 4:48am

1. The name of the main form, I removed it to not confuse people and forgot that one... (The Sub for checking Listbox items is inside a module)

2. Now that you mention it, I realize how stupid (clumsy?) it was, to try it that way. I did it differently and I think that's the way I should have done it all along. (See solution)

Thank you for making me realize flawed logic...

2 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Maciej Los · Accepted Answer · 2012-05-02T23:07:00

Sandeep Mewara was trying to tell you to use selecteditem object, not ListBox1.SelectedItems(LBitmCounter). In my example i replaced it with oItem

VB

For Each oItem As [Object] In ListBox1.SelectedItems
    If oItem.ToString = "Text 1" Then
        Action 1
    ElseIf oItem.ToString = "Text 2" Then
        Action 2
    ElseIf oItem.ToString = "Text 3" Then
        Action 3
    End If
Next

Learn about SELECT CASE[^] statement.

Saufkumpel · Accepted Answer · 2012-05-02T22:49:00

VB

For LBitmCounter = 0 To ListBox1.SelectedItems.Count - 1
    If ListBox1.SelectedItems(LBitmCounter).ToString = "Text 1" Then
        Action 1
    ElseIf ListBox1.SelectedItems(LBitmCounter).ToString = "Text 2" Then
        Action 2
    ElseIf ListBox1.SelectedItems(LBitmCounter).ToString = "Text 3" Then
        Action 3
    End If
Next

How to get string of each selected item in Listbox (MultiSimple)

2 solutions

Solution 3

Solution 1

Add your solution here

Preview 0