Dim ListBoxEx As ListBox = CType(sender, ListBox)
Dim itemString As String = CType(ListBoxEx.Items(e.Index), String)
Dim x As Integer
For x = 1 To 50
ListBox1.Items.Add("Item " & x.ToString())
Next x
Process.Start("http://mpgh.net)
My.Settings.Checkbox = Me.CheckBox1.Checked