none
Control ListView RRS feed

  • Pregunta

  • Hola colegas como siempre de ante mano les agradezco su apoyo en mis preguntas que como todo novato en este hermoso mundo del desarrollo ps una vez más recurro a su sabiduría, resulta que como parte del desarrollo que estoy llevando a cabo para la empresa donde trabajo estoy ya en la parte del desarrollo de la aplicación de escritorio y tengo una pregunta he estado experimentando con los diferentes controles viendo sus funciones etc y me he encontrado que con el ListView que se puede utilizar de la manera que yo quiero para generar un panel de habitaciones ya he probado insertarle datos manuales, distintas imagenes etc mis duda es la siguiente yo manualmente lleno el control ListView.Items de la siguiente manera 

    Dim lst As ListViewItem

            ListView1.View = View.LargeIcon
            lst = ListView1.Items.Add("Texto", 0)

    y quisiera que ese control se repitiera tantas veces tenga registros en la base de datos y que en el texto muestre el número de la habitación y la imagen cambie según los diferentes estatus que tengo definido, ya he logrado obtener la cantidad de registros con una rutina y pasarla a un elemento en mi barra de estado y quisiera que este control se multiplique por la misma cantidad de veces que tengo como resultado del conteo de registros en mi base de datos

    gracias por todo espero como siempre me puedan apoyar

    jueves, 24 de septiembre de 2015 5:30

Todas las respuestas

  • Saludos:

    Lo que se hace para llenar el ListView con los datos de una consulta es asignar un DataSource al ListView, asi:

    Dim constr As String = "Put your connection string here"
            Dim ds As New DataSet
            Dim con As New SqlClient.SqlConnection(constr)
            con.Open()
            Dim sqladap As New SqlClient.SqlDataAdapter("select * from tbl_Employee", con)
            sqladap.Fill(ds)
     
            For i As Integer = 0 To ds.Tables(0).Columns.Count – 1
                ListView1.Columns.Add(ds.Tables(0).Columns(i).ToString())
            Next
            For i As Integer = 0 To ds.Tables(0).Rows.Count – 1
                Dim listRow As New ListViewItem
                listRow.Text = ds.Tables(0).Rows(i)(0).ToString()
                For j As Integer = 1 To ds.Tables(0).Columns.Count – 1
                    listRow.SubItems.Add(ds.Tables(0).Rows(i)(j).ToString())
                Next
                ListView1.Items.Add(listRow)
            Next

    Encuentras otro ejemplo aqui:

    http://www.codeproject.com/Questions/73389/How-to-show-data-from-sql-database-to-listview-vb

    Espero ayude.

    JOSE LUIS


    Dios NO los llamo LAS DIEZ RECOMENDACIONES

    lunes, 28 de septiembre de 2015 17:25