
OBTENER NUMERO DE COLUMNAS DE UN DATAGRIDVIEW
Publicado por Mario (8 intervenciones) el 22/03/2017 13:13:11
Hola Buenas.
Les cuento lo que necesito, pasa que necesito obtener el numero de columnas de un datagrid. para que dirán ustedes
bueno resulta que tengo ciertas consultas en mi programa que no muestras todos los datos de la tabla y en mi datagrid tengo un evento doble click que me exporta los datos de la tabla a unos textbox. entonces por consecuencia al hacer una consulta con menos datos al hacer doble click y al haber una incongruencia entre la cantidad de datos en el datagrid y la cantidad de textbox me sale un error
en fin lo que pensaba hacer era, sí obtengo el numero de columnas y si este es menor a cierto numero, arrojar un mensaje que diga (" NO SE PUEDE HACER ESTA ACCIÓN DESDE ESTE FILTRO DE DATOS").
adjuntare el código de como llenos mis datagrid
LO SOLUCIONE CHICOS Y DEJO EL CODIGO POR SI LES AYUDA XD
Les cuento lo que necesito, pasa que necesito obtener el numero de columnas de un datagrid. para que dirán ustedes
bueno resulta que tengo ciertas consultas en mi programa que no muestras todos los datos de la tabla y en mi datagrid tengo un evento doble click que me exporta los datos de la tabla a unos textbox. entonces por consecuencia al hacer una consulta con menos datos al hacer doble click y al haber una incongruencia entre la cantidad de datos en el datagrid y la cantidad de textbox me sale un error
en fin lo que pensaba hacer era, sí obtengo el numero de columnas y si este es menor a cierto numero, arrojar un mensaje que diga (" NO SE PUEDE HACER ESTA ACCIÓN DESDE ESTE FILTRO DE DATOS").
adjuntare el código de como llenos mis datagrid
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Try
conexion.Open()
Dim consulta As String
consulta = "SELECT area as Area,mes as Mes, SUM(cantidad) as Hojas FROM fotocopias where mes ='" & boxmes3.Text & "' group BY area"
adaptador = New MySqlDataAdapter(consulta, conexion)
datos = New DataSet
adaptador.Fill(datos, "fotocopias")
':::Primero declaramos una variable de tipo entero que llevara la suma
Dim saldo As Integer = 0
':::Iniciamos nuestro ciclo For que recorrera la tabla en el DataSet
For Each row As DataRow In datos.Tables("fotocopias").Rows
':::Empezamos a sumar cada uno de los valores de la fila Precio y los pasamos a entero
saldo += Convert.ToInt32(row.Item("Hojas").ToString)
Next
':::Agregamos una nueva fila a la tabla del DataSet respetando los tipo de campos
datos.Tables("fotocopias").Rows.Add("Total:", " ", saldo)
Mostrar2.Tabla2.DataSource = datos
Mostrar2.Tabla2.DataMember = "fotocopias"
Mostrar2.Show()
CleanFiltroFoto()
conexion.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
LO SOLUCIONE CHICOS Y DEJO EL CODIGO POR SI LES AYUDA XD
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub Tabla2_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Tabla2.DoubleClick
If Tabla2.ColumnCount <> 6 Then
MsgBox("No se puede ejecutar esta accion desde este filtro")
Else
Vales.lblid2.Text = Me.Tabla2.CurrentRow.Cells.Item(0).Value
Vales.boxarea2.Text = Me.Tabla2.CurrentRow.Cells.Item(1).Value
Vales.boxseccion2.Text = Me.Tabla2.CurrentRow.Cells.Item(2).Value
Vales.boxmes2.Text = Me.Tabla2.CurrentRow.Cells.Item(3).Value
Vales.txtthojas.Text = Me.Tabla2.CurrentRow.Cells.Item(4).Value
Vales.txtaño.Text = Me.Tabla2.CurrentRow.Cells.Item(5).Value
End If
End Sub
Valora esta pregunta


0