Forms Data Controls :: ListBox, Array List / Update The Listbox Content?

I am designing a program that will let me enter the name of an item to swap and adds the swap to an array list when a button Add is pressed. Once the item is added to the array list a Sub Procedure should be called which displays the contents of the array list in a list box.

The system will also allow me to remove items from the array list using a Remove button

followed by updating array list.

I have done some part which puts item into the listbox1 which i named lstSwapList.I would need some assistance on the Sub Procedure to display the Value or Description on the other listbox2 which i have also named lstContent,if a value is selected from the listbox1.

I would also want to know how to update the Listbox content,However i hv added a sample of the way i guess it may be.

Any complete solution from anybody on the Sub Procedure and the Update Swap procedure will be greately appreciated.

The script below is what i have done so far.

Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub lstContent_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles lstContent.SelectedIndexChanged
End Sub
Protected Sub lstSwapList_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles lstSwapList.SelectedIndexChanged
End Sub
Protected Sub btnAddSwap_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnAddSwap.Click
Dim SwapValue As String = "Sixty Pounds"
Dim Counter As Integer = 8
Dim SwapN0 As Integer
lstSwapList.Items.Add(SwapValue)
lstSwapList.Items.Add(Counter)
lstSwapList.Items.Add(New ListItem("300", "1"))
lstSwapList.Items.Add(New ListItem("ASP.Net", "2"))
lstSwapList.Items.Add(New ListItem("Programming", "3"))
SwapN0 = lstSwapList.SelectedValue
For Counter = 0 To -1
SwapN0 = lstContent.Items.Count
Next
End Sub
Protected Sub btnDeleteSwap_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnDeleteSwap.Click
lstSwapList.Items.Remove(lstSwapList.SelectedValue)
End Sub
Protected Sub btnUpdateSwap_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnUpdateSwap.Click
End Sub
End Class

=======================================
Sub UpdateSwap(ByVal valueA As String, ByVal ValueBAs String, ByVal ValueC As Integer, ByVal ValueD As Date)