Tema destacado: Últimos eventos sobre seguridad/inseguridad
 Autor
|
Tema: Ayuda con ComboBox (Leído 2,602 veces)
|
proteus8
 Desconectado
Mensajes: 47
|
Hola amigos, quisiera que me ayudaran en lo siguiente: en mi proyecto tengo 2 tipos de combobox unos que me muestran datos de una base de datos y otros que los llene manualmente en la propiedad ítems, Los que lleno con la base de datos lo hago de la siguiente manera: Dim adp2 As New SQLiteDataAdapter("select MED_MARCA from cmb_medidores ", cnnloc2)
adp2.Fill(vds2, "CMB_MEDIDORES")
ComboBox1.DataSource = vds2.Tables("CMB_MEDIDORES")
ComboBox1.DisplayMember = "MED_MARCA"Lo que quiero hacer es que estos siempre me muestren como primer item en la lista un “Seleccione una Opccion…” Como Puedo Hacer esto? Con los que lleno manualmente tengo el siguiente problema siempre el primer item que muestran es vacio, me gutaria hacer lo mismo con estos que como primer item me muestre “Seleccione una Opccion…”, en estos agregue ese item pero me sigue mostrando como primero el vacio. Por favor solicito su ayuda.
|
|
|
|
|
En línea
|
|
|
|
Edu
Desconectado
Mensajes: 1.082
Ex XXX-ZERO-XXX
|
No agregues otro item, sino cambia el combox1.text a ver q sale
|
|
|
|
|
En línea
|
|
|
|
|
|
Novlucker
Ninja y
Ex-Staff
Desconectado
Mensajes: 10.239
Yo que tu lo pienso dos veces
|
En el que ingresas los datos de manera manual, deberías de hacer algo como combobox.Items.Insert(0,”Seleccione una opcion…”) Para el que el ingreso es desde el DataAdapter no puedes hacer lo mismo y daría un error de que esta seteado el DataSource, por lo que la modificación debe de ser directamente en la fuente de datos con un DataRow DataRow dr = vds2.Tables("CMB_MEDIDORES").NewRow()
dr[0] = 50057 'El valor que quieras
'.
'.
'.
'.
dr[x] = "Seleccione una opcion…" 'La que sea que estes mostrando en el combobox
vds2.Tables("CMB_MEDIDORES").Rows.InsertAt(dr,0) Luego realizas el binding. Lo he hecho pensando en sharp, pero tiene que ser igual Saludos |
|
|
|
|
En línea
|
Contribuye con la limpieza del foro, reporta los "casos perdidos" a un MOD XD
http://twitter.com/novlucker
"Hay dos cosas infinitas: el Universo y la estupidez humana. Y de la primera no estoy muy seguro." Albert Einstein |
|
|
Edu
Desconectado
Mensajes: 1.082
Ex XXX-ZERO-XXX
|
Te entendi mal creo, perdon por meterme donde no debo xD
|
|
|
|
|
En línea
|
|
|
|
proteus8
Desconectado
Mensajes: 47
|
Muchas gracias Novlucker por tu ayuda, pero me da error
con los que se cargan con la base de datos dice:
me dice que ("DataRow" es un tipo y no se puede usar como expresión)
con los otros no me da error y si me muestra en el listado el item "Seleccione..." pero al ingresar al formulario por primera ves me muestra vació.
XXX-ZERO-XXX
No se preocupe maestro lo que importa es la intensión, a si que gracias.
|
|
|
|
|
En línea
|
|
|
|
Novlucker
Ninja y
Ex-Staff
Desconectado
Mensajes: 10.239
Yo que tu lo pienso dos veces
|
Puedes poner los códigos?
Saludos
|
|
|
|
|
En línea
|
Contribuye con la limpieza del foro, reporta los "casos perdidos" a un MOD XD
http://twitter.com/novlucker
"Hay dos cosas infinitas: el Universo y la estupidez humana. Y de la primera no estoy muy seguro." Albert Einstein |
|
|
SRVAM
Desconectado
Mensajes: 130
|
Buenas, prueba esto: cuando hayas cargado los items, haz lo siguiente, creo que esto es lo que he entendido que quieres conesguir. comboBox1.SelectedItem = -1;
comboBox1.Text = "Seleccione..."; Cuando lo pruebes me cuentas  |
|
|
|
|
En línea
|
C# Programmer
-Estudiante MCTS .NET Framework 3.5-
|
|
|
Edu
Desconectado
Mensajes: 1.082
Ex XXX-ZERO-XXX
|
SRVAM, eso es lo q le dije pero no le funciono xD
|
|
|
|
|
En línea
|
|
|
|
SRVAM
Desconectado
Mensajes: 130
|
pero ademas de cambiar el combobox.text hay que seleccionar el item -1, asi no hay que agregar otro item como tu dijiste, pero si hacemos que no haya ningun item seleccionado, entonces si se cambia la propiedad .Text del combo |
|
|
|
|
En línea
|
C# Programmer
-Estudiante MCTS .NET Framework 3.5-
|
|
|
proteus8
Desconectado
Mensajes: 47
|
muchachos muchas gracias por su ayuda, los combobox que lleno de forma manual los deje funcionando como quería , lo hice de esta manera:_
ComboBox12.Items.Insert(0, "SELECCIONE...")
ComboBox12.SelectedIndex = 0
con lo que aun estoy pegado es con los combobox que lleno con la base de datos.
|
|
|
|
|
En línea
|
|
|
|
proteus8
Desconectado
Mensajes: 47
|
Puedes poner los códigos?
Saludos
Novlucker este es mi codigo: Novlucker así puse el código que me dijiste: Dim adp2 As New SQLiteDataAdapter("select MED_MARCA from cmb_medidores ", cnnloc2)
adp2.Fill(vds2, "CMB_MEDIDORES")
ComboBox1.DataSource = vds2.Tables("CMB_MEDIDORES")
ComboBox1.DisplayMember = "MED_MARCA"
DataRow(dr = vds2.Tables("CMB_MEDIDORES").NewRow())
dr[0] = "SELECCIONE..." 'El valor que quieras
dr([x] = "MED_MARCA") 'La que sea que estes mostrando en el combobox
vds2.Tables("CMB_MEDIDORES").Rows.InsertAt(dr, 0)
|
|
|
|
« Última modificación: 9 Marzo 2011, 19:14 por Novlucker »
|
En línea
|
|
|
|
Novlucker
Ninja y
Ex-Staff
Desconectado
Mensajes: 10.239
Yo que tu lo pienso dos veces
|
Intenta cambiando los valores de la tabla antes de enlazarla al combobox y realizar el databind.
Espero que estes cambiando esa x que puse a modo de ejemplo en la columna del datarow
¿Y el otro que dices que se muestra vacio? estas cargando antes los valores al combobox en el onLoad de tu formulario?
Saludos
|
|
|
|
|
En línea
|
Contribuye con la limpieza del foro, reporta los "casos perdidos" a un MOD XD
http://twitter.com/novlucker
"Hay dos cosas infinitas: el Universo y la estupidez humana. Y de la primera no estoy muy seguro." Albert Einstein |
|
|
proteus8
Desconectado
Mensajes: 47
|
Novlucker
gracias nuevamente,
si, lo los valores vacíos ya quedo solucionado.
con los del datarow lo que me pasa es que me da el siguiente error:
("DataRow" es un tipo y no se puede usar como expresión)
|
|
|
|
|
En línea
|
|
|
|
Novlucker
Ninja y
Ex-Staff
Desconectado
Mensajes: 10.239
Yo que tu lo pienso dos veces
|
Ahora lo veo, por que pones esos paréntesis donde no van?  DataRow(dr = vds2.Tables("CMB_MEDIDORES").NewRow())Además, no veo que hayas convertido nada a VB.NET Dim dr as DataRow
dr = 'bla bla bla Saludos |
|
|
|
|
En línea
|
Contribuye con la limpieza del foro, reporta los "casos perdidos" a un MOD XD
http://twitter.com/novlucker
"Hay dos cosas infinitas: el Universo y la estupidez humana. Y de la primera no estoy muy seguro." Albert Einstein |
|
|
|
 |
