VB datagridview底部合计

Question

本帖最后由 LangJing_1 于 2009-10-18 14:07:00 编辑

Answer 1

VB.NET的吧。
直接取出行列相加不就行了。

Answer 2

x1=0
x2=0
x3=0        DataGridView1.Rows.Add(TextBox3.Text, TextBox2.Text) 
        For i As Int32 = 0 To DataGridView1.Rows.Count - 1 
        DataGridView1.Rows(i).Cells(2).Value = DataGridView1.Rows(i).Cells(0).Value * _ 
                                                              DataGridView1.Rows(i).Cells(1).Value 
          
        DataGridView1.Rows(i).Cells(3).Value = DataGridView1.Rows(i).Cells(2).Value * _ 
                                                              CDbl(Val(TextBox1.Text)) 
        DataGridView1.Rows(i).Cells(4).Value = DataGridView1.Rows(i).Cells(2).Value * _ 
                                                              CDbl(Val(TextBox2.Text)) x1=x1+DataGridView1.Rows(i).Cells(2).Value
x1=x1+DataGridView1.Rows(i).Cells(3).Value
x1=x1+DataGridView1.Rows(i).Cells(4).Value
next 

Answer 3

不行就加VAl
x1=x1+val(DataGridView1.Rows(i).Cells(2).Value)

Answer 4

x1=0 
x2=0 
x3=0 
赋值不对啊，提示错误

Answer 5

在通用里声明一下
dim x1 as single

Answer 6

再用ado+sql,取得合计填入标签即可
sql="select sum(字段1) 字段1,sum(字段2) 字段2 from 表"
rs.Open sql, cn, adOpenKeyset, adLockOptimistic
label1.caption= rs!字段1
label2.caption= rs!字段2
rs.close

Answer 7

#13楼
datagridview是前台单一的表，没有连接数据库的。只做于前台运算如果是连接数据库的话，那么可以直接在数据库做统。调取数据就行了。
不过那样比较麻烦点

Answer 8

不早说呀
dim iNum(2) as Single
For i As Int32 = 0 To DataGridView1.Rows.Count - 1 
    iNum(0)= iNum(0) + DataGridView1.Rows(i).Cells(2).Value
    iNum(1)= iNum(1) + DataGridView1.Rows(i).Cells(3).Value
    iNum(2)= iNum(2) + DataGridView1.Rows(i).Cells(4).Value
next
label1.caption= cstr(iNum(0)) 
label2.caption= cstr(iNum(1))
label3.caption= cstr(iNum(2))

Answer 9

加标签丑了点，DataGridView没有用过，我用的控件可以直接设公式，看DataGridView是否有这个功能，如果没有也可以加1行，把累计的结果写入

Answer 10

把累计结果再写入dtv好象不好写吧，要指定行位才行，

Answer 11

另外iNum()能不能用DIM一句写完