duda con combobox

[mveraa]

ocupo esta rutina para cargar las nacionalidades en el combo , aki todo bien.


sql = "SELECT id_nacionalidad,nacionalidad FROM `tipo_nacionalidad` order by nacionalidad"


comandos.CommandText = sql
comandos.CommandType = CommandType.Text
comandos.Connection = conexion
comandos.Connection.Open()
lect = comandos.ExecuteReader()

While lect.Read()
CMB_NACIONALIDAD.ValueMember = lect(0)
CMB_NACIONALIDAD.Items.Add(lect(1))
End While



con la esta otra rutina muy similar traigo los datos de una persona con su nacionalidad y codigo

aqui trae mi nombre y mi nacionalidad
....
....
....
CMB_NACIONALIDAD.ValueMember = lect(3) '1 q representa a chile
CMB_NACIONALIDAD.Items.Add(lect(4)) 'chile.




ahora pongo un boton para poder saber el valor del pais seleccionado en el combo
ocupo

MsgBox(CMB_NACIONALIDAD.ValueMember.ToString())

pero ponga el pais q ponga siempre me sale 1 haciendo refencia a chile , no entiendo como hacer para que me muestre el valor de pais q selecciono en el combo


saludosl y gracias.