Visual Basic - A ver si me podeis ayudar...

Life is soft - evento anual de software empresarial
 
Vista:

A ver si me podeis ayudar...

Publicado por negu (2 intervenciones) el 30/01/2001 10:29:10
Hola estoy muy verde en VB,tengo que hacer una aplicación para tienda de informática, tengo una tabla para cada tipo de artículo(monitores,grabadoras,cd-rom,etc...) y quiero que se puedan hacer los clientes sus presupuestos, eligiendo el tipo de monitor y los demás componentes, bueno mi pregunta es como puedo rellenar un combo con los contenidos de la tabla,asi el cliente podrá coger un tipo de monitor y en una caja de texto al lado pueda aparecer el precio del componente.Muchas gracias, a todos, poco a poco iré preguntando más dudas.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:A ver si me podeis ayudar...

Publicado por Ariopolis (159 intervenciones) el 30/01/2001 12:29:27
Carga en el combo los articulos con su ID:
Suponiendo rs un recordset donde tienes tu tabla

Do Until rs.EOF
combo.AddItem rs!articulo
combo.ItemData(combo.NewIndex) = rs!id_articulo
rs.MoveNext
Loop

Despues en el evento Click del combo:

Dim rsPrecio As ADODB.Recordset
Set rsPrecio = New ADODB.Recordset
rsPrecio.Open "select precio from tabla where id_articulo=" & combo.ItemData(combo.ListIndex)
text.Text = rsPrecio!precio
rsPrecio.Close
Set rsPrecio = Nothing

ESTE CÓDIGO ES PARA UTILIZAR CONTROLES SIN ENLAZAR Y CON ADO.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar