Question

vb 6.0在窗体中mshflexgrid怎么实现相同名称数量加一

如：商品 数量 金额
A 1 20
b 1 30
A 1 20
A 1 20
b 1 30
A 1 20
要求结果
商品 数量 金额
A 4 80
b 2 60

Answer 1

那就是类似，对于数组的求和操作。
从上往下，遍历每一行，商品名相同的数量以及金额累加！

你的数据如果是来源于数据库的，那么可以直接用统计函数来完成。

追问

能给个详细的代码吗

追答

你的数据是怎么来的呢？

追问

我的数据是这样的
Dim conn As New ADODB.Connection Dim rs As New ADODB.Recordset Dim Str1 As String
Dim Str2 As String Dim Str3 As String Str1 = "Provider=Mic……;"
rs!名称 = Text1.Text