VB datagridview底部合计续
Dim cSum0, cSum1, cSum2, cSum3, cSum4, cSum5, cSum6, cSum7 As String
DataGridView1.Rows.Add(textbox1.Text, textbox2.Text)
DataGridView4.Rows.Add(textbox1.Text,textbox1.Text)
For i As Int32 = 0 To DataGridView3.Rows.Count - 1
cSum0 = cSum0 + DataGridView4.Rows(i).Cells(0).Value
cSum1 = cSum1 + DataGridView4.Rows(i).Cells(3).Value
cSum2 = cSum2 + DataGridView4.Rows(i).Cells(4).Value
cSum3 = cSum3 + DataGridView4.Rows(i).Cells(5).Value
cSum4 = cSum4 + DataGridView4.Rows(i).Cells(6).Value
cSum5 = cSum5 + DataGridView4.Rows(i).Cells(7).Value
cSum6 = cSum6 + DataGridView4.Rows(i).Cells(8).Value
cSum7 = cSum7 + DataGridView4.Rows(i).Cells(9).Value
L.Text = CStr(cSum0)
G.Text = CStr(cSum1)
Y.Text = CStr(cSum2)
F.Text = CStr(cSum3)
 
相关问答:
请教一下:我用vb写了一个调用Illustrator的测试程序,代码很简单:Private Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......
VB偶学得不错,现在大一,高三的时候就学VB了,现在学校里都是学C#和VB.NET的兄弟多。。。
偶要转行VB.NET了~当年学VB学了2年,对VB里面的常用函数都十分了解。
Select、If结构、For Next循环、等都了解。。。 ......
"insert into user1(name,age) values('" & Text1.Text & "','" & Text2.Text & "' )"
问题:对sql语句中单、双引号模糊。既然 Text1.Text就表示 ......
菜鸟学VB,各位大侠能帮助我么,我的QQ是544508194,mail. huguyue619@163.com
恳请各位大侠加我,指点小弟一二
请经常光顾本论坛,有疑难众多高手都会尽力.
动手实践写代码,经常光顾本论坛浏览与学习.
......