Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.
Mensajes - braescobedo
Páginas: [1]
1
« en: Lunes 17 de Octubre de 2011, 17:46 »
Hola que tal, quiero crear una grafica de barras con un datagridview donde sus valores varian, no estoy utilizando BD, nunca me habia tocado graficar en vb .net y no se como, e estado viendo con el control chart pero aun no se bien como hacerle, estoy trabajando con vb .net 2008 de ante mano muchas gracias por el que me ayude 
2
« en: Lunes 3 de Octubre de 2011, 17:57 »
ya corregi eso, mira tengo el codigo asi pero me lo repite tres veces pero solo del primer grid no se como hacerle para que ya me lo haga con los dos bien
For Each dgc As DataGridViewRow In dg_tc.Rows
For Each dgf As DataGridViewRow In dg_tf.Rows
If dgf.Cells(0).Value = dgc.Cells(0).Value Then
For x As Integer = 0 To dg_tc.Rows.Count - 1
For y As Integer = x + 1 To dg_tc.Rows.Count - 1
If dg_tc.Item(0, x).Value = dg_tc.Item(0, y).Value Then
u = Val(dg_tc.Item(7, x).Value) + Val(dg_tc.Item(7, y).Value)
ElseIf dg_tc.Item(0, x).Value <> dg_tc.Item(0, y).Value Then
u = Val(dg_tc.Item(7, x).Value)
End If
Next
t = dg_tc.Item(0, x).Value
variable.guardad(t, u, v)
intercambiador2.instancia = variable
intercambiador2.dibujarTablad()
Next
Exit For
End If
Next
Next
intercambiador2.Show()
3
« en: Lunes 3 de Octubre de 2011, 17:24 »
Hola que tal, primero que nada gracias por responder mi pregunta.
Creo que si entendi tu idea tengo un detalle al momento de implementar tu codigo me marca error en el cells
if dgf.Cells(0).value = dgc.Cells(0).value then
en el primer cells me marca error Error 1 'Cells' no es un miembro de 'System.Windows.Forms.DataGridView'
pero ya importe: Imports System.Windows.Forms
Estoy trabajando en vb.net 2008
4
« en: Miércoles 28 de Septiembre de 2011, 22:25 »
hola que tal
mi problema e sel siguiente tengo dos datagrids en un form y su primera columna se llama equipo principal de los dos datagrid y lo que quiero es que compare que si tienen el mismo equipo principal que se sume la septima columna cuando sean iguales pero que se sume la del datagrid 1 y la del datagrid 2 por separado, para asi en otro form pasarlo a otro datagrid donde ponga el equipo principal y la suma de la septima columna del datarid 1 y la suma de la septima columna del datagrid 2.
algo asi:
datagrid 1
eq. principal .........................septima columna
e1...........................................................................1
e2...........................................................................1
e2 ..........................................................................1
data grid 2
eq. principal....................................septima columna
e2.............................................................................1
e3.............................................................................1
e2.............................................................................1
e1.............................................................................1
en otro form
datagrid
equipo principal ......suma sept. col. de datagrid1..........suma sept. col. de datagrid2
e1.......................................................................1..............................................................1
e2 ......................................................................2............................................................. 2
e3 ......................................................................0............................................................. 1
de ante mano muchas gracias por el que me ayude con esto tengo, se me ocurrio algo asi para comparar el primer datagrid
For x As Integer = 0 To dg_tc.Rows.Count - 1
For y As Integer = x + 1 To dg_tc.Rows.Count - 1
If dg_tc.Item(0, x).Value = dg_tc.Item(0, y).Value Then
u = Val(dg_tc.Item(7, x).Value) + Val(dg_tc.Item(7, y).Value)
ElseIf dg_tc.Item(0, x).Value <> dg_tc.Item(0, y).Value Then
u = Val(dg_tc.Item(7, x).Value)
End If
Next
5
« en: Miércoles 28 de Septiembre de 2011, 22:23 »
hola que tal
mi problema e sel siguiente tengo dos datagrids en un form y su primera columna se llama equipo principal de los dos datagrid y lo que quiero es que compare que si tienen el mismo equipo principal que se sume la septima columna cuando sean iguales pero que se sume la del datagrid 1 y la del datagrid 2 por separado, para asi en otro form pasarlo a otro datagrid donde ponga el equipo principal y la suma de la septima columna del datarid 1 y la suma de la septima columna del datagrid 2.
algo asi:
datagrid 1
eq. principal .........................septima columna
e1...........................................................................1
e2...........................................................................1
e2 ..........................................................................1
data grid 2
eq. principal....................................septima columna
e2.............................................................................1
e3.............................................................................1
e2.............................................................................1
e1.............................................................................1
en otro form
datagrid
equipo principal ......suma sept. col. de datagrid1..........suma sept. col. de datagrid2
e1.......................................................................1..............................................................1
e2 ......................................................................2............................................................. 2
e3 ......................................................................0............................................................. 1
de ante mano muchas gracias por el que me ayude con esto, seme ocurrio algo asi con el primer datagrid
For x As Integer = 0 To dg_tc.Rows.Count - 1
For y As Integer = x + 1 To dg_tc.Rows.Count - 1
If dg_tc.Item(0, x).Value = dg_tc.Item(0, y).Value Then
u = Val(dg_tc.Item(7, x).Value) + Val(dg_tc.Item(7, y).Value)
ElseIf dg_tc.Item(0, x).Value <> dg_tc.Item(0, y).Value Then
u = Val(dg_tc.Item(7, x).Value)
End If
Next
Páginas: [1]
|
Mostrar Mensajes
