<%@ Page Language=VB Debug=true %>
Sub lb1_Changed(Sender As Object, E As EventArgs)
lb1.BackColor = System.Drawing.Color.FromName(lb1.SelectedItem.Text)
End Sub
Writing Code that Fires When the Selection Changes in a ListBox Control
Select a Color:
Blue
Red
Green
Purple
Black