ListBOX

Buenas
No se si es esto a lo que te refieres
Cargar el combo
MCombo.DataSource = MiTables

MCombo.DisplayMember = "Descripcion"

MCombo.ValueMember = "codigo"

y para seleccionar, con arreglo a una cadena
MCombo.SelectedIndex = MCombo.FindString(micadena)



Suerte
LuisMiguel
"Troqui." escribió en el mensaje
news:a09901c486e1$b85fb4a0$
Quiero hacer una consulta. Es algo que se hacer en ASP,
pero no en Visual Basic, y debe ser fácil:

En tiempo de ejecución, quiero llenar un listbox (desde
una tabla), y darle el valor de ID y de descripción, y
dejar seleccionado el valor que corresponda, para que
luego pueda ser tomado como valor para grabarlo en la
tabla.

En ASP, podría ser algo así:

<select name=f_Destinatario_ID class=texto_caja size=1>
<option value=0>Elija un Destinatario</option>
<%while not objdestinatario.EOF%>
<option value=<%= objdestinatario("Destinatario_ID")%>
<%if (Int(objdestinatario("Destinatario_ID"))=Int
(t_Destinatario_ID)) then response.write " selected" end
if%>><%= objdestinatario("Destinatario_dsc")%></option>
<% objdestinatario.movenext
wend%>
</select>

Muchas gracias