ListBox - Recupero Valore

Private Sub Form2_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
ListBox1.Items.Add("i")
ListBox1.Items.Add("b")
ListBox1.Items.Add("c")
ListBox1.Items.Add("d")
End Sub


Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged

Debug.Print(ListBox1.SelectedValue & CType(ListBox1.Items(sender.SelectedIndex), String))

End Sub