insertar datos en un listbox

[josezamora]

Hola, buenos dias, tengo una pantalla con un checkbox que lo que me hace es añadir datos, de una consulta a un listbox.

El problema que tengo es el siguiente, la consulta me recoge dos campos el valor y el texto, y lo que no se es como añadir esos campos en el listbox.

Antes habia un combo que se realizaba de la siguiente forma:

For i = 1 To Me.cmb_distribuidor.Items.Count - 1
Me.lst_distr_seleccionados.Items.Add(New ListItem(Me.cmb_distribuidor.Items(i).Text, Me.cmb_distribuidor.Items(i).Value))
Next

pero ahora ese combo ha desaparecido,se ha cambiado por un campo textbox y entonces se realiza con una carga en un dataset con la consulta.
la consuta es la siguiente;

select distinct ccliente_div, dcliente_div from tabla_clientes
order by dcliente_div

Aqui es dodne recogo los dos campos que los tengo en un dataset.

Alguien me podria ayudar a decirme como añadir al listbox los datos?
Muchas gracias.