Listbox操作

左右搬移


        For Each li As ListItem In ListBox1.Items
            If li.Selected = True Then
                ListBox2.Items.Add(li)
            End If
        Next

        For i As Integer = ListBox1.Items.Count - 1 To 0 Step -1
            If ListBox1.Items(i).Selected = True Then
                ListBox1.Items.Remove(ListBox1.Items(i))
            End If
        Next

方法：
https://msdn.microsoft.com/zh-tw/library/system.web.ui.webcontrols.listbox(v=vs.110).aspx

REF:
http://163.20.173.56/tch/vb/VB_Small/0h07.htm
http://codex.wiki/question/1178530-4521
http://guessi.pixnet.net/blog/post/26215590-%5B%E7%A8%8B%E5%BC%8F%5D-%E8%87%AA%E8%A8%82listbox-items-(c%23)