Получить соответствующие элементы из выбранного элемента списка

Question

Как гласит заголовок, как только я выберу элемент из lstordpizza, соответствующий элемент из lstordserving и lstordqty будет показан из выпадающих списков, показанных на изображении. Любая помощь будет оценена.:)

РЕДАКТИРОВАТЬ: Извините за отсутствие информации в моем сообщении, и я не могу придумать способ сделать это.

Когда я выбираю "Гавайский верх", в поле со списком должен появиться соответствующий пункт "Семья", а также количество "9".

Answer 1

Сначала вам нужно загрузить элементы списка в выпадающем списке, когда вы открываете форму для каждого цикла.

 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    For Each item As String In ServinSizeLB.Items
        ServinSizeCB.Items.Add(item)
    Next

    For Each item As Integer In PizzaQtyLB.Items
        PizzaQtyCB.Items.Add(item)
    Next

End Sub

Затем вы добавляете событие SelectedIndexChanged в свой список пиццы.
Поэтому, как только вы выбираете пиццу в списке, вы выбираете значения других списков в комбинированных полях.
Но сначала вам нужно проверить, есть ли уже выбранное значение в списке.
Иначе выбор исчезнет, ​​когда вы выберете другую пиццу.
"Может быть, я уже знаю размер, но я передумал, какую пиццу я хочу"

Private Sub PizzaLB_SelectedIndexChanged(sender As Object, e As EventArgs) Handles PizzaLB.SelectedIndexChanged

    If ServinSizeLB.SelectedItem = Nothing Then
        ServinSizeCB.SelectedIndex = 0
    End If

    If PizzaQtyLB.SelectedItem = Nothing Then
        PizzaQtyCB.SelectedIndex = 0
    End If
End Sub

Не стоит забывать, что первый предмет находится в локации 0

Я не знаю, хотите ли вы, чтобы они выбрали размер порции или количество пиццы в списке или в выпадающем списке...
но здесь также код, если это список.

Так что создайте SelectedIndexChanged даже для списка размера порции и один для списка количества пиццы.
Поскольку элементы находятся в том же порядке в списке, и в поле со списком вы связываете выбранный элемент списка со списком.

Private Sub ServinSizeLB_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ServinSizeLB.SelectedIndexChanged
    ServinSizeCB.SelectedIndex = ServinSizeLB.SelectedIndex
End Sub

Private Sub PizzaQtyLB_SelectedIndexChanged(sender As Object, e As EventArgs) Handles PizzaQtyLB.SelectedIndexChanged
    PizzaQtyCB.SelectedIndex = PizzaQtyLB.SelectedIndex
End Sub

То же самое вы делаете со списком, если выбираете значение в выпадающем списке.

Private Sub ServinSizeCB_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ServinSizeCB.SelectedIndexChanged
    ServinSizeLB.SelectedIndex = ServinSizeCB.SelectedIndex
End Sub

Private Sub PizzaQtyCB_SelectedIndexChanged(sender As Object, e As EventArgs) Handles PizzaQtyCB.SelectedIndexChanged
    PizzaQtyLB.SelectedIndex = PizzaQtyCB.SelectedIndex
End Sub