Solved

Listbox selections

Posted on 2009-04-06
7
128 Views
Last Modified: 2012-05-06
Hi, I have this listbox1 populated by a database and next to it another empty one (listbox2). Between the two, 2 buttons "-->" & "<--". You guessed it I need those buttons to add and remove items from listbox1 to listbox2. One they have been removed from listbox1, I do not want those values to still be in it, it's really to move items between the two listboxes. What would be code to achieve this ?
Thanks
0
Comment
Question by:GPSAddict
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 4
  • 3
7 Comments
 
LVL 20

Expert Comment

by:informaniac
ID: 24077215
Try this code.

Hope it's clear enough for u.
protected void btnAdd_Click(object sender, EventArgs e)
    {
        for (int i = lstFrom.Items.Count - 1; i >= 0; i--)
        {
            if (lstFrom.Items[i].Selected)
            {
                if (lstTo.Items.FindByValue(lstFrom.Items[i].Value) != null)
                {
                    continue;
                }
                else
                {
                    lstTo.Items.Add(lstFrom.Items[i]);
                    lstFrom.Items.Remove(lstFrom.Items[i]);
                }
            }
        }
 
    }
        
 
   
    protected void btnRemove_Click(object sender, EventArgs e)
    {
        try
        {
            for (int i = lstTo.Items.Count - 1; i >= 0; i--)
            {
                if (lstTo.Items[i].Selected)
                {
                    lstFrom.Items.Add(lstTo.Items[i]);
                    lstTo.Items.Remove(lstTo.Items[i]);
                }
            }
        }
        catch (Exception ex)
        {
            throw ex;
        }
    } 

Open in new window

0
 

Author Comment

by:GPSAddict
ID: 24077244
I'll try, the only problem is I don't know C, I use VB. Thanks
0
 
LVL 20

Accepted Solution

by:
informaniac earned 500 total points
ID: 24077298
Well sorry for the same.
But In situations like this use this link

http://www.developerfusion.com/tools/convert/csharp-to-vb/
Protected Sub btnAdd_Click(ByVal sender As Object, ByVal e As EventArgs)
    For i As Integer = lstFrom.Items.Count - 1 To 0 Step -1
        If lstFrom.Items(i).Selected Then
            If lstTo.Items.FindByValue(lstFrom.Items(i).Value) IsNot Nothing Then
                Continue For
            Else
                lstTo.Items.Add(lstFrom.Items(i))
                lstFrom.Items.Remove(lstFrom.Items(i))
            End If
        End If
        
    Next
End Sub
 
 
 
Protected Sub btnRemove_Click(ByVal sender As Object, ByVal e As EventArgs)
    Try
        For i As Integer = lstTo.Items.Count - 1 To 0 Step -1
            If lstTo.Items(i).Selected Then
                lstFrom.Items.Add(lstTo.Items(i))
                lstTo.Items.Remove(lstTo.Items(i))
            End If
        Next
    Catch ex As Exception
        Throw ex
    End Try
End Sub

Open in new window

0
Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 

Author Comment

by:GPSAddict
ID: 24077418
Alright, let me try this at home and I'll get back to you asap. Thanks !
0
 

Author Comment

by:GPSAddict
ID: 24082922
2 things if I may, if you do a batch add, it adds the items but in reverse order ie. I select 1,2,3,4 but it adds in this order; 4,3,2,1. Also, when I remove an item from the 2nd listbox, how can I make it so that re-appears where it was before ? Thanks
0
 

Author Comment

by:GPSAddict
ID: 24139418
Hello ?
0
 
LVL 20

Assisted Solution

by:informaniac
informaniac earned 500 total points
ID: 24144653
For the add in proper order, this code should work...

For making it to appear where it was, I don't think it might be possible. U'll have to try out some other trick...
Protected Sub btnAdd_Click(ByVal sender As Object, ByVal e As EventArgs)
    For i As Integer = 0 To lstFrom.Items.Count - 1
        If lstFrom.Items(i).Selected Then
            If lstTo.Items.FindByValue(lstFrom.Items(i).Value) IsNot Nothing Then
                Continue For
            Else
                lstTo.Items.Add(lstFrom.Items(i))
            End If
        End If
    Next
    
    
    For i As Integer = lstFrom.Items.Count - 1 To 0 Step -1
        If lstFrom.Items(i).Selected Then
            lstFrom.Items.Remove(lstFrom.Items(i))
        End If
        
        
    Next
End Sub

Open in new window

0

Featured Post

Announcing the Most Valuable Experts of 2016

MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
RLDC Reporting in Visual studio 11 44
asp Google Map 2 63
Phone Does Not Abide By CSS Breakpoint For Navigation Controls 6 32
orderby list (from Json) 1 30
Today is the age of broadband.  More and more people are going this route determined to experience the web and it’s multitude of services as quickly and painlessly as possible. Coupled with the move to broadband, people are experiencing the web via …
A quick way to get a menu to work on our website, is using the Menu control and assign it to a web.sitemap using SiteMapDataSource. Example of web.sitemap file: (CODE) Sample code to add to the page menu: (CODE) Running the application, we wi…
How to Install VMware Tools in Red Hat Enterprise Linux 6.4 (RHEL 6.4) Step-by-Step Tutorial

733 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question