论坛 › 『 提问交流 』 › 数组如何对col 0 前10位一样并且col 2一样的col 3值（加总） 进行分类汇总！！

liupeng1990607 发表于 2013-2-28 13:18:30

数组如何对col 0 前10位一样并且col 2一样的col 3值（加总） 进行分类汇总！！

本帖最后由 liupeng1990607 于 2013-3-1 08:24 编辑






以上是资料表跟要求！
把上面图的资料变为下面listview格式 分类汇总

kevinch 发表于 2013-2-28 14:31:43

用字典就可以了

liupeng1990607 发表于 2013-2-28 15:10:27

回复 2# kevinch


    具体是怎么弄啊 不太明白！！！

kevinch 发表于 2013-2-28 15:29:51

上个示例数据，用excel装着就行了，我读取到数组中演示给你

liupeng1990607 发表于 2013-2-28 16:31:19

回复 4# kevinch


    资料表已经上传 表里也有我说明的要求 。。。谢谢！！

老萧 发表于 2013-2-28 17:34:14

老实说 我不懂 表格。。。。。。。。。。。。。。。。。。

kevinch 发表于 2013-2-28 18:06:17

#include <array.au3>

Dim $arr=[["模号","总金额"]]

$xls=ObjGet("z:\资料.xls")
With $xls.worksheets("sheet1")
        $arrt=.range("a1").resize(.cells(.rows.count,1).end(3).row,5).value
EndWith
;_ArrayDisplay($arrt)
$xls.close(False)
$dic=ObjCreate("scripting.dictionary")
For $n=1 To UBound($arrt,2)-1
        $str=StringLeft($arrt[$n],10)
        If Not $dic.exists($str) Then
                ReDim $arr
                $dic($str)=UBound($arr)-1
                $arr[$dic($str)]=$str
        EndIf
        If Not $dic.exists($arrt[$n]) Then
                ReDim $arr
                $dic($arrt[$n])=UBound($arr,2)-1
                $arr[$dic($arrt[$n])]=$arrt[$n]
        EndIf
        $arr[$dic($str)]+=$arrt[$n]
        $arr[$dic($str)][$dic($arrt[$n])]+=$arrt[$n]
Next
_ArrayDisplay($arr)总金额放后面不方便，放前面了需要的话，自己输出时重新整理一下就行了，输出到listview之类的，自己完成吧

xms77 发表于 2013-2-28 20:06:18

回复 1# liupeng1990607
建议把数据写入数据库，然后方便统计数据，比listview灵活多了

liupeng1990607 发表于 2013-3-1 08:13:44

回复 7# kevinch


    这个数据时从informix抓出来的 你的意思抓出来 然后用sqlite连接？

liupeng1990607 发表于 2013-3-1 08:19:52

回复 6# 老萧


    得出来的值有问题吧 时间比总金额都大？ 因为这个excel中最后的金额 是时间x代码1对应的单价得出来的！！！！！！！！！！！！！！！！！

liupeng1990607 发表于 2013-3-1 08:25:58

没有人吗直接先顶一下！！！！！！！！！！！！！！！！！！

liupeng1990607 发表于 2013-3-1 09:39:15

本帖最后由 liupeng1990607 于 2013-3-1 10:20 编辑

回复 6# 老萧


。。。。。。。。。。。。。。。。。。。。。。。。。。。。

liu19910917 发表于 2013-3-2 12:48:46

看看 学习下 ！！！

liupeng1990607 发表于 2013-3-3 16:09:38

自己顶一下 求帮助！！！！！！

netegg 发表于 2013-3-3 17:20:54

informix直接用Provider=Ifxoledbc;Data Source=dbName@serverName;User ID=myUsername;Password=myPassword;连接，sqlite直接操作，不用导数据

查看完整版本: 数组如何对col 0 前10位一样并且col 2一样的col 3值（加总） 进行分类汇总！！