VSFlexGrid求和显示在最后一行vb代码

发布网友发布时间：2024-09-30 13:17

共2个回答

热心网友时间：2024-10-05 12:01

Dim i As Integer
Dim sum1, sum2 As Double
MSFlexGrid1.Rows = MSFlexGrid1.Rows + 1
For i = 1 To MSFlexGrid1.Rows - 2
sum1 = sum1 + CDbl(MSFlexGrid1.TextMatrix(i, 1))
sum2 = sum2 + CDbl(MSFlexGrid1.TextMatrix(i, 2))
Next i
MSFlexGrid1.TextMatrix(MSFlexGrid1.Rows - 1, 1) = sum1
MSFlexGrid1.TextMatrix(MSFlexGrid1.Rows, 2) = sum2

热心网友时间：2024-10-05 12:05

你在取单价的时候用一个变量进行累加，如何在最后一行显示就可以

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com