SoloCodigo

CLR: .Net / Mono / Boo / Otros CLR => VB .NET => Mensaje iniciado por: alexis17 en Miércoles 6 de Agosto de 2008, 16:47

Título: problemas con combo box
Publicado por: alexis17 en Miércoles 6 de Agosto de 2008, 16:47
buenos dias que tal,
tenia un problema, queria llenar un combobox, pero con datos fijos, pero queria llenarlos por su propiedad item, porque me esta dando problemas, cuando recupero la informacion me dice que el dato no es compatible

tengo un grid el grid tiene 2 columnas de texto y una olumna que tiene un combobox,
entonces si pongo los datos en el combo que esta dentro del grid, me sale bien puedo insertar, pero el problema es cuando, ago una consulta y quiero llenar el grid, me manda error de como que ese campo no es compatible asi que me llena las otras columnas menos la que tiene el combobox cargado por el item

y ese campo no quiero cargarlo de base de datos porque no vale la pena solo son dos estados

asi que lo que intentaba era esto , tratar de llenar el combo box como si fuera datos de la base de datos informacion fija pero sin utilizar el item pero no funciona
   
       Dim ds_nombre As New DataSet

        Dim dr As DataRow = ds_nombre.Tables(0).NewRow()
        dr.Item("nombre") = "0"
        ds_nombre.Tables(0).Rows.Add(dr)


       
        cnombre.DataSource = ds_nombre.Tables(0)
        cnombre.ValueMember = "nombre"
        cnombre.DisplayMember = "nombre"
Título: Re: problemas con combo box
Publicado por: SysEdw en Miércoles 6 de Agosto de 2008, 18:17
Hola amigo  alexis17  haber si te es de util este codigo

Código: Text
  1. Private Sub RecuperarCombo()
  2.         Dim ds As DataSet
  3.         Dim da As New SqlDataAdapter("select idtienda,Descripcion from tienda", My.Settings.ProgConnectionString)
  4.         ds = New DataSet
  5.         da.Fill(ds, "tienda")
  6.         Me.cnombre.DataSource = ds.Tables(0)
  7.         Me.cnombre.DisplayMember = "Descripcion"
  8.         Me.cnombre.ValueMember = "idtienda"
  9. End Sub
  10.  
Título: Re: problemas con combo box
Publicado por: alexis17 en Miércoles 6 de Agosto de 2008, 18:28
Cita de: "SysEdw"
Hola amigo  alexis17  haber si te es de util este codigo

Código: Text
  1. Private Sub RecuperarCombo()
  2.         Dim ds As DataSet
  3.         Dim da As New SqlDataAdapter("select idtienda,Descripcion from tienda", My.Settings.ProgConnectionString)
  4.         ds = New DataSet
  5.         da.Fill(ds, "tienda")
  6.         Me.cnombre.DataSource = ds.Tables(0)
  7.         Me.cnombre.DisplayMember = "Descripcion"
  8.         Me.cnombre.ValueMember = "idtienda"
  9. End Sub
  10.  

hola que tal, que va ese codigo no me sirve, porque ese es para cargar el combo box desde una base de datos pero yo lo quiero simular que se carge como una  base de datos pero no quiero hacer select solo quiero simular de la forma de como se hace con el item