Problema evento textchanged

[ferbad12]

Hola a todos necesito que me ayuden. Yo tengo un comboBox con 6 items
Lo que busco es que cuando cambie de item en el combobox me muestre
un mensaje de dialogo con el nuevo item
Pero tengo el problema de que el evento textchanged se dispara en el evento Load
Por favor necesito su ayuda

Código:

Public Class Form1

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

        cboLista.Items.Add("uno")
        cboLista.Items.Add("dos")
        cboLista.Items.Add("tres")
        cboLista.Items.Add("cuatro")
        cboLista.Items.Add("cinco")
        cboLista.SelectedIndex = 0

    End Sub

    Private Sub cboLista_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles cboLista.TextChanged
        MsgBox(cboLista.Text)

    End Sub
End Class

[alexg88]

Usa el evento SelectedValueChanged o SelectedIndexChanged en vez del TextChanged, es más aconsejable.

El problema no es ese por otro lado. Lo que pasa es que en el Load tu estás cambiado el selectedindex, por lo que obviamente se lanza el evento TextChanged. Lo que tienes que hacer es añadir el control del evento despues del cambio de índice con la instrucción AddHandler.

Código vb:

Public Class Form1
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
        cboLista.Items.Add("uno")
        cboLista.Items.Add("dos")
        cboLista.Items.Add("tres")
        cboLista.Items.Add("cuatro")
        cboLista.Items.Add("cinco")
        cboLista.SelectedIndex = 0
 AddHandler cboLista.SelectedIndexChanged, AddressOf ComboBox1_SelectedIndexChanged
 
    End Sub
 
    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles cboLista.SelectedValueChanged
        MsgBox(cboLista.Text)
 
    End Sub
End Class
 

Un saludo.