En este grupo En todos

Foro de Lenguaje basic



COMO USAR UN DATAGRIDVIEW

LINA
Tecnico en desarrollo de software cesde
Escrito por Lina Quintero
el 27/06/2008

Hola


Es primer vez que trabajo con un datagridview

He leido mucho sobre el pero la verdad no entiendo

Sera que me puede ayudar

Necesito que en un datagridview se muestre el resultado de una consulta

Que se pueda consultar por fecha o por identificacion y que al consultar me traiga

La inforamacion de una base de datos en sql server

Pero esto viene de un formulario que al pulsar la opcion de reporte inmediatamente pida la consulta y luego de eso pase al formulario donde esta el datagridview


Le agradezco su ayuda

Haver G. Ramirez
Ingeniería en sistemas universidad mar...
Escrito por Haver G. Ramirez
el 14/07/2008

Primero tienes que hacer tu query de consulta luego es bien sencillo pasarle el dataset al datagrtid

Solo utiliza la propiedad datasource del datagridview

Ahora con el query yo lo que utilizo es un bucle que recorre los valores para sacar la condicionante where


Declaro una variable que contendra las opciones del query dependiendo de que tantos campos tenga asi sera las propiedades de almacenaje del object

Dim str(6) As Object

            If Me.txt_Centro.Text <> Nothing Then
                str(0) = " centros. Orden = "" & Me.cmb_coincidencias.Text & """
            End If

            If Me.txt_cliente.Text <> Nothing Then
                str(1) = " centros. Cliente = " & Me.cmb_cliente.Value & ""
            End If
creo una variable string y una integer

            Dim query As String = Nothing
            Dim i As Integer
            Dim count As Integer
            For i = 0 To 6

"Recorro los objetos y si no tienen nada los adjunto al string query y si ya paso mas de una ves le agrego un AND
                If str(i) <> "" Or Val(str(i)) <> 0 Then
                    count = count + 1
                    If count > 1 Then
                        query = query & " AND " & str(i)
                    Else
                        query = query & str(i)
                    End If
                End If
            Next

            If count > 0 Then
                dtadapter = New SqlClient. SqlDataAdapter("SELECT dbo.Centros.Fecha_Apertura " _
                         & " FROM dbo. Centros WHERE " & query & "", conexion)
            End If

Escrito por Moy
el 25/08/2009

Cool Gracias me ayudo a solucionar un problema que tenia