Remplissage d'une zone de liste déroulante à partir d'une autre zone de liste déroulante

Question

J'ai deux zones de liste déroulantes; l'un contient une liste de pays, et l'autre contient une liste de villes. Comment puis-je le définir de sorte que lorsque vous sélectionnez un pays, les villes de ce pays deviennent visibles dans l'autre liste déroulante?

Je suppose que cela crée essentiellement la collection d'éléments pour la deuxième boîte en fonction de la valeur sélectionnée de la première.

EDIT: Je cherche quelque chose comme ceci:

If cboCountry.Text = "Australia" Then 
cboCity.Collection("Melbourne, "Sydney") 
End If 

Answer 1

EDIT

Aller sur votre édition, je l'ai changé le code, cela devrait être ce que vous cherchez :)

Placez ceci dans l'événement modifié de la valeur de la liste déroulante 1 et cela devrait fonctionner.

  Private Sub cboCountry_SelectedValueChanged(sender As System.Object, e As System.EventArgs) Handles cboCountry.SelectedValueChanged 

      If cboCountry.Text = "England" Then 
       cboCity.Items.Add("London") 
      End If 

      End Sub 

Answer 2

Chargez les données dans un Dictionary(Of String, List(Of String)) qui contient le mappage des pays vers les villes.

Ensuite, regardez simplement le pays sélectionné dans le dictionnaire et passez en revue ses valeurs.

Voici un exemple de la dernière partie. Cela suppose que vous avez déjà chargé vos données du dictionnaire (évidemment ne le font pas coder en dur les valeurs dans le code):

' As a private Form variable: 
Private cities As New Dictionary(Of String, List(Of String))() 
' … Load data in Form_Load. 

' In the citiesCombo.SelectedValueChanged event of the combo box: 
cboCity.Items.Clear() 
For Each city As var In cities(cboCountry.Text) 
    cboCity.Items.Add(city) 
Next 

Si vous voulez juste tester cela avec des données de jouets , voici quelques uns:

Private cities As New Dictionary(Of String, List(Of String))() From { _ 
    {"England", New List(Of String)() From {"London", "Darthmouth", "Oxford", "Cambridge"}}, _ 
    {"Wales", New List(Of String)() From {"Cardiff", "Swansea"}}, _ 
    {"Scotland", New List(Of String)() From {"Edinburgh", "Glasgow", "Aberdeen"}} _ 
}