[3booody]

كود :

Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
        ListBox2.SelectedItem = ListBox1.SelectedIndex
        ListBox3.SelectedItem = ListBox1.SelectedIndex
        TextBox1.Text = ListBox1.SelectedItem & ListBox2.SelectedItem & ListBox3.SelectedItem
    End Sub

كل عام وانته بخير