Hola amigos, de nuevo yo aqui preguntando    lo que pasa es que tengo un combox el que cargo con datos obtenidos de una tabla de la base de datos, ahora lo que quiero es capturar el valor seleccionado en el combobox, en otras palabras quiero que cuando el valor del combobox vaya cambiando me vaya guardando este valor una variable o en un texbox. me podrian ayudar con esto por favor!!
el codigo con el que lleno mi combobox con los datos de la base es:

Dim adp As New SQLiteDataAdapter("select * from cmb_zona order by case zon_nombre when " & "'" & Module1.zona & "' then 1 else 99 end", cnnloc)
        adp.Fill(vds, "CMB_ZONA")
        ComboBox2.DataSource = vds.Tables("CMB_ZONA")
        ComboBox2.DisplayMember = "ZON_NOMBRE"
 

desde ya muchas gracias...

Pues inicializa la variable en el evento SelectedIndexChanged o SelectedValueChanged