Hola
DavidNovato, en el display va el campo que quieres mostrar en el campo y en el value, el campo valor(identificador único) como el "ID", que está detrás del display, del cual podrás su valor para manejarlo en otras consultas al seleccionar. Y viendo bien el código, en ningún momento abres conexion para la consulta, por lo que te falta esto :
Código vb:
Ver originalconexion.Open()
adap.Fill(dt)
conexion.Close()
Prueba y nos comentas. Saludos!

.