您的位置：程序门 -> .net技术 -> vb.net

datagridview 新问题

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

datagridview 新问题[已结贴,结贴人:guzhudq]

发表于：2008-01-21 17:03:45 楼主

请问各位高手,vb 2005里如何在datagridview最尾处增加一行,值为前面几行的值的和?

发表于：2008-01-21 17:43:331楼得分:1

private sub button2_click（byval sender as system.object, byval e as system.eventargs) handles button2.click
datagridview1.columns.add（"columns3", "3header")

'（2，0）为第三列第一行所对应的单元格，剩下的依次类推
me.datagridview1（)（2, 0).value = convert.toint16（me.datagridview1（)（1, 0).value) + convert.toint16（me.datagridview1（)（0, 0).value)
end sub

发表于：2008-01-21 19:51:512楼得分:2

datagridview1.rows.add（1)

datagridview1.rows.（datagridview1.rows.count-1).item（0).value=datagridview1.rows（0).item（0).value+...+datagridview1.rows（datagridview1.rows.count-1).item（0).value

发表于：2008-01-21 21:00:083楼得分:2

和我之前的那个问题一抹一样这个是hbxtlhx兄给我的解决方案希望对你有帮助。
private sub datagridview1_cellvalidating（byval sender as object, _
byval e _
as datagridviewcellvalidatingeventargs) _
handles datagridview1.cellvalidating

me.datagridview1.rows（e.rowindex).errortext = " "
dim newinteger as integer

' don 't try to validate the 'new row ' until finished
' editing since there
' is not any point in validating its initial value.
if datagridview1.rows（e.rowindex).isnewrow then return
if not integer.tryparse（e.formattedvalue.tostring（), newinteger) _
orelse newinteger < 0 then

e.cancel = true
me.datagridview1.rows（e.rowindex).errortext = "the value must be a non-negative integer "

end if
end sub

发表于：2008-01-22 08:36:314楼得分:1

1樓的是加一列，你的問題可以參考2、3樓的。

发表于：2008-01-22 08:55:045楼得分:1

都已经说了

发表于：2008-01-22 09:30:376楼得分:3

datagridview1.rows.add（1)
有时候可能添加不上程序报错说datagridview1在使用中

dim datatable1 as datatable
datatable1 = 你需要的查询
datatable1.rows.add（1) 'datatable1中添加一行

将你查出的结果计算后赋给该行
datagridview1.rows.（datatable1.rows.count-1).item（0).value=所有的值

发表于：2008-01-22 14:48:117楼得分:0

谢谢众位楼主的回复,问题基本上已解决,如下:
dim datatable1 as datatable
datatable1 = dataset1.tables（"tb1")
datatable1.rows.add（1)
me.datagridview1.rows（datatable1.rows.count - 1).cells（0).value = "合计"
dim b as integer
for b = 1 to me.datagridview1.columncount - 1
me.datagridview1.rows（datatable1.rows.count - 1).cells（b).value = _
（me.datagridview1.rows（0).cells（b).value + me.datagridview1.rows（1).cells（b).value) / 2 '最后一行各列的值为第一行与第二行（假设一共三行)相对应列的值之和
next

其他资讯