[3booody]

لديك الحدث SelectedIndexChanged

كود :

Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
       Label1.Text = ListBox1.SelectedItem.ToString
   End Sub