¿Ayuda en programa Visual Basic 2008?

Lo he conseguido, la cuestión es que los nombres de las ciudades los puse en mayúsculas y el programa no los leía, los he dejado en minúsculas y ha evaluado correctamente. Gracias!
¿Ayuda en programa Visual Basic 2008?

Respuestas:

Hola

mira lo que pasa es que cuando vas seleccionando sigues agregando mas items entonces lo que deberias hacer limpiar primero y luego agregar bueno seria asi


--------------------------------------...
If ComboBox1.Text = "CALI" Then
ListBox1.Items.Clear()

ListBox1.Items.Add("HOTEL San Marcos")
ListBox1.Items.Add("HOTEL San Jacinto")
ListBox1.Items.Add("HOTEL El Rey")

ElseIf ComboBox1.Text = "MEDELLIN" Then
ListBox1.Items.Clear()

ListBox1.Items.Add("HOTEL El Paisa")
ListBox1.Items.Add("HOTEL El Arriero")
ListBox1.Items.Add("HOTEL De Lujo")

Else
ListBox1.Items.Clear()

ListBox1.Items.Add("HOTEL La Playa")
ListBox1.Items.Add("HOTEL San Isidro")
ListBox1.Items.Add("HOTEL El Barco")
End If
--------------------------------------...

uhmmmm que rraro yo lo probe y salio perfectamente

aver intenta con e index

--------------------------------------...
If ComboBox1.SelectedIndex = 0 Then
ListBox1.Items.Clear()

ListBox1.Items.Add("HOTEL San Marcos")
ListBox1.Items.Add("HOTEL San Jacinto")
ListBox1.Items.Add("HOTEL El Rey")

Else
If ComboBox1.SelectedIndex = 1 Then
ListBox1.Items.Clear()

ListBox1.Items.Add("HOTEL El Paisa")
ListBox1.Items.Add("HOTEL El Arriero")
ListBox1.Items.Add("HOTEL De Lujo")

Else
If ComboBox1.SelectedIndex = 2 Then
ListBox1.Items.Clear()

ListBox1.Items.Add("HOTEL La Playa")
ListBox1.Items.Add("HOTEL San Isidro")
ListBox1.Items.Add("HOTEL El Barco")
End If
End If
End If
--------------------------------------...

Salu2 Espero que te alla ayudado